diff options
Diffstat (limited to 'web/webserver.scm')
| -rw-r--r-- | web/webserver.scm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/web/webserver.scm b/web/webserver.scm index dae235a..e0b0ea6 100644 --- a/web/webserver.scm +++ b/web/webserver.scm @@ -17,7 +17,7 @@ (web request) (web response) (web uri) - (fibers web server) + (web server) (gn cache memoize) (web gn-uri) (gn db sparql) @@ -348,8 +348,9 @@ otherwise search for set/group data" ;; only way to update the handler reference held by the web server ;; would be to restart the web server. (run-server (cut handler <> <>) - #:addr (inet-pton AF_INET address) - #:port port)) + 'http + (list #:addr (inet-pton AF_INET address) + #:port port))) (define (main args) (write (string-append "Starting Guile REST API " get-version " server!")) |