(Arne Babenhauserheide)
2013-04-21: more consistent indentation. more consistent indentation.
diff --git a/hello-world-server.w b/hello-world-server.w --- a/hello-world-server.w +++ b/hello-world-server.w @@ -1,19 +1,21 @@ -#!/home/arne/Quell/Programme/wisp/wisp-multiline.sh !# +#!/home/arne/Quell/Programme/wisp/wisp-multiline.sh +; !# define : hello-world-handler request request-body values + ; header ' : content-type . : text/plain - + ; content let : : text "Hello World!" if : string? : getlogin - set! text : string-append text : getlogin - set! text : string-append text " Sucker!" + set! text : string-append text : getlogin + set! text : string-append text " Sucker!" set! text - string-append text " " - number->string : tm:hour : gmtime : current-time - . ":" - number->string : tm:min : gmtime : current-time + string-append text " " + number->string : tm:hour : gmtime : current-time + . ":" + number->string : tm:min : gmtime : current-time . text @@ -24,3 +26,5 @@ display : string-append "Server starting newline run-server hello-world-handler 'http ' : #:port 8081 + +