Commit 327876ccc28611e1fd35ee7caace83cc6eeea7f2

Thomas de Grivel 2013-12-22T00:25:07

Add JSON.

diff --git a/json.lisp b/json.lisp
index 3bdfaa7..fd46d58 100644
--- a/json.lisp
+++ b/json.lisp
@@ -20,16 +20,10 @@
 
 ;;    JSON
 
-(defclass json-asset (js-asset) ())
+(defclass json-asset (asset) ())
 
 (defmethod asset-ext ((asset json-asset))
   '.json)
 
 (defmethod asset-class-extensions ((class (eql 'json-asset)))
   '(.json))
-
-(defmethod asset-include ((output stream)
-			  (context (eql :html))
-			  (asset json-asset)
-			  &key &allow-other-keys)
-  (error "Don't know how to include JSON in HTML."))
diff --git a/lowh.triangle.assets.asd b/lowh.triangle.assets.asd
index b6ac349..4f6ae1c 100644
--- a/lowh.triangle.assets.asd
+++ b/lowh.triangle.assets.asd
@@ -40,8 +40,9 @@
    (:file "asset"      :depends-on ("config" "mime-types" "lib"))
    (:file "find"       :depends-on ("asset"))
    (:file "font"       :depends-on ("asset"))
+   (:file "json"       :depends-on ("asset"))
    (:file "precompile" :depends-on ("find"))
    (:file "preprocess" :depends-on ("find"))
-   (:file "css"        :depends-on ("preprocess" "html"))
    (:file "image"      :depends-on ("asset" "html"))
+   (:file "css"        :depends-on ("preprocess" "html"))
    (:file "js"         :depends-on ("preprocess" "html"))))