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))))