ws
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49
diff --git a/package.lisp b/package.lisp
index ff2d936..4d8f54d 100644
--- a/package.lisp
+++ b/package.lisp
@@ -26,14 +26,28 @@
#:*debug*
#:*asset-url-prefix*
#:*asset-path-prefix*
- #:*assets-dirs* #:assets-dir
- #:*precompiled-assets* #:precompiled-asset
+ #:*assets-dirs*
+ #:assets-dir
+ #:*precompiled-assets*
+ #:precompiled-asset
+ ;; Classes
+ #:asset
+ #:font-asset
+ #:image-asset
+ #:preprocessed-asset
+ #:css-asset
+ #:js-asset
;; Observers
- #:asset-path #:asset-url
+ #:asset-path
+ #:asset-url
#:assets-dirs
- #:find-asset #:find-assets-from-spec #:find-assets-from-specs
+ #:find-asset
+ #:find-assets-from-spec
+ #:find-assets-from-specs
#:locate-precompiled-assets
;; Rendering
+ #:process-asset
+ #:preprocess-asset
#:asset-html-include
;; Precompile
#:debug-msg
diff --git a/preprocess.lisp b/preprocess.lisp
index c126bf9..afc8361 100644
--- a/preprocess.lisp
+++ b/preprocess.lisp
@@ -105,5 +105,5 @@
(file-more-recent-p (asset-source-path asset)
output))
assets))
- (with-output-to-file/utf-8 (out output)
- (compile-asset asset out)))))
+ (with-output-to-file/utf-8 (stream output)
+ (compile-asset asset stream)))))