aboutsummaryrefslogtreecommitdiff
path: root/cgi-bin/guest_book.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'cgi-bin/guest_book.cgi')
-rwxr-xr-xcgi-bin/guest_book.cgi7
1 files changed, 3 insertions, 4 deletions
diff --git a/cgi-bin/guest_book.cgi b/cgi-bin/guest_book.cgi
index f8caccf..8c0057b 100755
--- a/cgi-bin/guest_book.cgi
+++ b/cgi-bin/guest_book.cgi
@@ -1,4 +1,4 @@
-#! /usr/bin/guile \
+#! /usr/local/bin/guile3 \
-e main -s
!#
@@ -7,7 +7,7 @@
(use-modules (sxml simple))
(use-modules (json))
-(define guest-book-json-file "cgi-bin/guest_book.json")
+(define guest-book-json-file "guest_book.json")
(define (decode-hex hex)
(string (integer->char
@@ -195,7 +195,7 @@ table {\n\
(lambda (error)
(display " <table border=\"1\" width=\"60%\">\n\
<tr><td>\n\
- <p>No guest have been added ): But you can be the first!</p>\n\
+ <p>No guest(s) have been added ): But you can be the first!</p>\n\
</td></tr>\n\
</table>\n"))
(lambda ()
@@ -216,4 +216,3 @@ table {\n\
(define (main args)
(display-guest-book))
-