From 0f951f848d7ca75037711445504290508bafcea1 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Fri, 15 Aug 2014 09:01:08 -0400 Subject: Wrap controller procedure in a trampoline. * scripts/guix-web: Trampoline it. --- scripts/guix-web | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scripts/guix-web b/scripts/guix-web index df66799..eeefa08 100755 --- a/scripts/guix-web +++ b/scripts/guix-web @@ -23,7 +23,7 @@ (guix-web server)) (spawn-server (make-tcp-server-socket #:port 37146)) -(start-guix-web controller) +(start-guix-web (lambda (path) (controller path))) ;;; Local Variables: ;;; mode: scheme -- cgit v1.2.3