Fixing pr11284

This commit is contained in:
Jay McCarthy 2010-10-04 15:40:58 -06:00
parent 09fbfcf5a9
commit 61441bba8f

View File

@ -135,7 +135,7 @@
(if launch-path (if launch-path
(string-append server-url launch-path) (string-append server-url launch-path)
server-url)) server-url))
(printf "Click 'Stop' at any time to terminate the Web Server.\n")) (printf "Stop this program at any time to terminate the Web Server.\n"))
(let ([bye (lambda () (let ([bye (lambda ()
(when banner? (printf "\nWeb Server stopped.\n")) (when banner? (printf "\nWeb Server stopped.\n"))
(shutdown-server))]) (shutdown-server))])