From 6bc89951062cf9b3f9d42696f7817bcfa1fb56a5 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Thu, 6 Dec 2007 01:03:27 -0500
Subject: [PATCH] xmode.code2html fix

---
 extra/xmode/code2html/code2html.factor | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/extra/xmode/code2html/code2html.factor b/extra/xmode/code2html/code2html.factor
index 5dc44841d3..dfc50988a3 100755
--- a/extra/xmode/code2html/code2html.factor
+++ b/extra/xmode/code2html/code2html.factor
@@ -16,9 +16,7 @@ IN: xmode.code2html
     tokenize-line htmlize-tokens ;
 
 : htmlize-lines ( lines mode -- )
-    <pre>
-        f swap load-mode [ htmlize-line nl ] curry reduce drop
-    </pre> ;
+    f swap load-mode [ htmlize-line nl ] curry reduce drop ;
 
 : default-stylesheet ( -- )
     <style>
@@ -34,9 +32,11 @@ IN: xmode.code2html
             <title> dup write </title>
         </head>
         <body>
-            over empty?
-            [ 2drop ]
-            [ over first find-mode htmlize-lines ] if
+            <pre>
+                over empty?
+                [ 2drop ]
+                [ over first find-mode htmlize-lines ] if
+            </pre>
         </body>
     </html> ;
 
