1 files changed, 79 insertions, 0 deletions

@@ -0,0 +1,79 @@
+#+chicken-5
+(import (r7rs))
+
+(define-library wikme
+  (import (scheme))
+  (cond-expand
+    (chicken-5 (import (chicken base)
+                       (chicken file)
+                       (chicken file posix)
+                       (chicken format)
+                       (chicken io)
+                       (chicken irregex)
+                       (chicken pathname)
+                       (chicken port)
+                       (chicken process)
+                       (chicken process-context)
+                       (chicken string)
+                       (chicken time posix)
+                       (cmark)
+                       (regex)          ; XXX: deprecated upstream
+                       (srfi-13)))
+    (else (error "Wikme doesn't support this R7RS scheme implementation yet.")))
+
+  ;; <wiki>
+  (export <wiki>
+          wiki-base-url
+          wiki-origin-dir
+          wiki-destination-dir
+          wiki-pages
+          wiki-defaults
+          wiki-default-ref
+          wiki-default-set!)
+
+  ;; <page>
+  (export <page>
+          page-source
+          page-body
+          page-origin
+          page-destination
+          page-template
+          page-source-transformers
+          page-path-transformers
+          page-wiki
+          page-meta
+          page-meta-ref
+          page-meta-set!)
+
+  ;; transformers
+  (export transform
+          transform-source!
+          transform-path!
+          page-cmark->html)
+
+  ;; templates
+  (export render-template
+          env->replacements
+          render)
+
+  ;; links
+  (export wiki-link-sre
+          wikify-links
+          linkify
+          slugify
+          string-capitalize
+          unslugify
+          path-relativize
+          wiki-page-origin-path
+          wiki-page-destination-path)
+
+  ;; page building
+  (export file->page
+          guess-title
+          basename
+          indexify
+          guess-last-updated
+          page->file
+          build-wiki)
+
+  (include "wikme.ss"))