--- a/serve.go	Mon Dec 04 17:21:08 2023 +0000
+++ b/serve.go	Sun Dec 10 23:57:40 2023 +0000
@@ -29,10 +29,11 @@
 	log.Println(r.RemoteAddr, r.Method, rw.StatusCode, r.URL)
 }
 
-func HttpServe(Dir string) {
+// This function is called by the `aya serve` subcommand
+func HttpServe(Dir string, Port int) {
 	handler := &Handler{http.FileServer(http.Dir(Dir))}
 	http.Handle("/", handler)
-	addr := fmt.Sprintf(":%d", 8000)
+	addr := fmt.Sprintf(":%d", Port)
 	log.Printf("Listening on %s\n", addr)
 	log.Fatal(http.ListenAndServe(addr, nil))
 }