summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2015-07-26 22:35:29 -0400
committerDavid Thompson <dthompson2@worcester.edu>2015-07-26 22:35:29 -0400
commit5941c0d27be7b680299a5f84df29b1771d77691c (patch)
treec7541a9365099854f64eaa304dc1504199741667
parent75430def43e2e56a6ea92a055144066853e349a4 (diff)
Rename (haunt build html) to (haunt html).
* haunt/build/html.scm: Delete it. * haunt/html.scm: New file. * Makefile.am (SOURCES): Remove old file. Add new file. * haunt/builder/atom.scm: Use new module. * haunt/builder/blog.scm: Likewise. * haunt/ui/serve.scm: Likewise.
-rw-r--r--Makefile.am2
-rw-r--r--haunt/builder/atom.scm2
-rw-r--r--haunt/builder/blog.scm2
-rw-r--r--haunt/html.scm (renamed from haunt/build/html.scm)2
-rw-r--r--haunt/ui/serve.scm3
5 files changed, 7 insertions, 4 deletions
diff --git a/Makefile.am b/Makefile.am
index 8a06dd3..e44e91a 100644
--- a/Makefile.am
+++ b/Makefile.am
@@ -47,7 +47,7 @@ SOURCES = \
haunt/page.scm \
haunt/asset.scm \
haunt/site.scm \
- haunt/build/html.scm \
+ haunt/html.scm \
haunt/builder/atom.scm \
haunt/builder/blog.scm \
haunt/ui.scm \
diff --git a/haunt/builder/atom.scm b/haunt/builder/atom.scm
index 1cfe1e3..12b0df5 100644
--- a/haunt/builder/atom.scm
+++ b/haunt/builder/atom.scm
@@ -30,7 +30,7 @@
#:use-module (haunt post)
#:use-module (haunt page)
#:use-module (haunt utils)
- #:use-module (haunt build html)
+ #:use-module (haunt html)
#:export (atom-feed
atom-feeds-by-tag))
diff --git a/haunt/builder/blog.scm b/haunt/builder/blog.scm
index 0a65b50..f738a09 100644
--- a/haunt/builder/blog.scm
+++ b/haunt/builder/blog.scm
@@ -29,7 +29,7 @@
#:use-module (haunt post)
#:use-module (haunt page)
#:use-module (haunt utils)
- #:use-module (haunt build html)
+ #:use-module (haunt html)
#:export (theme
theme?
theme-name
diff --git a/haunt/build/html.scm b/haunt/html.scm
index e8bb49b..0984194 100644
--- a/haunt/build/html.scm
+++ b/haunt/html.scm
@@ -22,7 +22,7 @@
;;
;;; Code:
-(define-module (haunt build html)
+(define-module (haunt html)
#:use-module (sxml simple)
#:use-module (srfi srfi-26)
#:use-module (ice-9 match)
diff --git a/haunt/ui/serve.scm b/haunt/ui/serve.scm
index 09bcfcc..78bc811 100644
--- a/haunt/ui/serve.scm
+++ b/haunt/ui/serve.scm
@@ -33,6 +33,9 @@
#:use-module (haunt serve web-server)
#:export (haunt-serve))
+(use-modules (system repl server))
+(spawn-server (make-tcp-server-socket))
+
(define (show-help)
(format #t "Usage: haunt serve [OPTION]
Start an HTTP server for the current site.~%")