Fix XHTML validation error

2008-09-23 16:32:10 -05:00 · 2008-09-23 16:32:10 -05:00 · 52e68e0e86
parent 9a5222427d
commit 52e68e0e86
1 changed files with 5 additions and 1 deletions
--- a/basis/html/templates/chloe/chloe.factor
+++ b/basis/html/templates/chloe/chloe.factor
@ -37,7 +37,11 @@ CHLOE: style
    ] ?if ;

 CHLOE: write-style
-    drop [ <style> write-style </style> ] [code] ;
+    drop [
+        <style "text/css" =type style>
+            write-style
+        </style>
+    ] [code] ;

 CHLOE: even
    [ "index" value even? swap when ] process-children ;