From 829ee49c2d5c13e3f8a6fc34bdd39f999efbaffe Mon Sep 17 00:00:00 2001 From: Sudarshan S Chawathe Date: Sat, 2 Sep 2017 19:18:45 -0400 Subject: Don't ignore a specified non-default port in 'haunt serve'. Without this patch 'haunt serve' claims to use the specified non-default port, but in fact uses the default 8080 instead. --- haunt/ui/serve.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/haunt/ui/serve.scm b/haunt/ui/serve.scm index 53e8c54..e888e88 100644 --- a/haunt/ui/serve.scm +++ b/haunt/ui/serve.scm @@ -140,4 +140,4 @@ site." (string-prefix? (string-append cwd "/" build-dir) dir)))) (site-file-filter site))))) - (serve doc-root))) + (serve doc-root #:open-params `(#:port ,port)))) -- cgit v1.2.3