diff options
author | elioat <elioat@tilde.institute> | 2022-12-04 15:27:56 -0500 |
---|---|---|
committer | elioat <elioat@tilde.institute> | 2022-12-04 15:27:56 -0500 |
commit | bd5a795f4082b08833d05cb6f4620f0811a697cc (patch) | |
tree | 4ee03515248b49eebbc14c6d16566cdd6e088af5 /rnd/guile/play.scm | |
parent | 1dc376603675b093926a3ae9dea73a5dd10e93c9 (diff) | |
download | december-2022-bd5a795f4082b08833d05cb6f4620f0811a697cc.tar.gz |
*
Diffstat (limited to 'rnd/guile/play.scm')
-rw-r--r-- | rnd/guile/play.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rnd/guile/play.scm b/rnd/guile/play.scm index 14b2b33..6307c09 100644 --- a/rnd/guile/play.scm +++ b/rnd/guile/play.scm @@ -8,7 +8,7 @@ (define (request-path-components request) (split-and-decode-uri-path (uri-path (request-uri request)))) -(define (hello-handler request body) +(define (routes-handler request body) (cond ((equal? (request-path-components request) '("banana")) (values '((content-type . (text/plain))) @@ -25,4 +25,4 @@ (uri->string (request-uri request))))) -(run-server hello-handler) +(run-server routes-handler) |