M site/contents/home.md → site/contents/home.md

@@ -43,15 +43,13 @@ <section class="pure-u-1 pure-u-md-1-2">
     <h2>Examples</h2>
     <p>The following example shows how to find recursively all files in the current folder that were modified in the last hour:</p>
     <pre>
-      <code>
-. ls-r 
+      <code>. ls-r 
 (mtime now 3600 - >) 
 filter</code>
     </pre>
     <p>The following example shows how to calculate the factorial of 5 using the <code>linrec</code> combinator:</p>
     <pre>
-      <code>
-5 
+      <code>5 
 (dup 0 ==) (1 +) 
 (dup 1 -) (*) linrec</code>
     </pre>

M site/rules.min → site/rules.min

@@ -31,7 +31,7 @@ {} :attributes
       attributes class %class @attributes
       "span" xelement :sp
       sp attributes %attributes @sp
-      value xtext :text
+      value xtext puts :text
       sp (text) => %children @sp
       sp to-xml @result
   )
@@ -78,7 +78,7 @@ (
   symbol highlight-min-codeblocks
   (str :html ==> str :result)
   (
-    html "<pre>(?:\n|\r\n|\s)*<code>((?:.|\n)*?)<\/code>(?:\n|\r\n|\s)*<\/pre>" 
+    html "<pre>\s*<code>((?:.|\n)*?)<\/code>\s*<\/pre>" 
     (1 get min-block-highlight) replace-apply @result
   )
 ) ::
@@ -87,7 +87,7 @@ (
   symbol highlight-min-codes
   (str :html ==> str :result)
   (
-    html "<code>((?:.|\n)*?)<\/code>" 
+    html "<code>(.*?)<\/code>" 
     (1 get min-inline-highlight) replace-apply @result
   )
 ) ::
@@ -103,7 +103,7 @@ (settings /title %site)
     (settings /version %version)
     (
       :temp contents temp markdown 
-      highlight-min-codes highlight-min-codeblocks @contents temp
+      highlight-min-codeblocks highlight-min-codes @contents temp
     )
     (contents %contents)
     (:temp tpl temp mustache @page temp)