typos

svn: r7381
2007-09-18 17:57:57 +00:00 · 2007-09-18 17:57:57 +00:00 · 11881c683d
commit 11881c683d
parent 9c8b9eb0ba
1 changed files with 2 additions and 2 deletions
--- a/collects/handin-server/handin-server.ss
+++ b/collects/handin-server/handin-server.ss
@ -627,8 +627,8 @@
  (hook 'server-start `([port ,(get-conf 'port-number)]))

  (define stop-status
-    (cond [(get-conf 'https-port-number) => (serve-status p)]
-          [else #f]))
+    (cond [(get-conf 'https-port-number) => serve-status]
+          [else void]))

  (define session-count 0)