summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--alley-cat.scm5
1 files changed, 4 insertions, 1 deletions
diff --git a/alley-cat.scm b/alley-cat.scm
index 6872a15..1b2aadd 100644
--- a/alley-cat.scm
+++ b/alley-cat.scm
@@ -7,7 +7,7 @@
sxml->html
; helper functions
- markdown-file->sxml link link-list css
+ markdown-file->sxml link link-list css js
; core functions
add-page! delete-page! add-css! delete-css!
@@ -63,6 +63,9 @@
(define (css path)
`(link (@ (rel "stylesheet") (href ,(++ (link-root) path)))))
+(define (js path)
+ `(script (@ (type "text/javascript") (src ,(++ (link-root) path)))))
+
(define (add-page! path body)
(hash-table-set! *pages* path body))