Permalink
Browse files

Fix web-server example which was calling the print function incorrectly.

  • Loading branch information...
1 parent 9d6eb63 commit b0bd841a58623b727c4d8809cd8910bf0f8188de @feeley feeley committed Jan 22, 2013
Showing with 5 additions and 5 deletions.
  1. +3 −3 examples/web-server/http.scm
  2. +2 −2 include/stamp.h
@@ -1,6 +1,6 @@
;==============================================================================
-; File: "http.scm", Time-stamp: <2009-03-13 12:05:07 feeley>
+; File: "http.scm", Time-stamp: <2013-01-22 11:39:32 feeley>
; Copyright (c) 2005-2008 by Marc Feeley, All Rights Reserved.
@@ -825,12 +825,12 @@
(eol
"\r\n"))
(print
+ port: port
(list version " 200 OK" eol
"Content-Length: " (u8vector-length message) eol
"Content-Type: text/html; charset=ISO-8859-1" eol
"Connection: close" eol
- eol)
- port)
+ eol))
(write-subu8vector
message
0
View
@@ -2,5 +2,5 @@
* Time stamp of last source code repository commit.
*/
-#define ___STAMP_YMD 20130104
-#define ___STAMP_HMS 183242
+#define ___STAMP_YMD 20130122
+#define ___STAMP_HMS 175355

0 comments on commit b0bd841

Please sign in to comment.