From 8aae6a68a67d1b013e4ebf1ff78a21e4a7981abd Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Mon, 5 Aug 2013 09:54:36 -0700
Subject: [PATCH] html.parser.printer: prevent negative indentations.

---
 extra/html/parser/printer/printer.factor | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/extra/html/parser/printer/printer.factor b/extra/html/parser/printer/printer.factor
index eabd53b4d0..5e636ef6ff 100644
--- a/extra/html/parser/printer/printer.factor
+++ b/extra/html/parser/printer/printer.factor
@@ -1,6 +1,6 @@
 USING: accessors assocs combinators html.parser
-html.parser.utils io kernel math namespaces sequences strings
-unicode.categories ;
+html.parser.utils io kernel math math.order namespaces sequences
+strings unicode.categories ;
 IN: html.parser.printer
 
 TUPLE: html-printer ;
@@ -79,7 +79,7 @@ SYMBOL: tagstack
     ] with-scope ;
 
 : tabs ( -- vseq )
-    tab-width get #indentations get * CHAR: \s <repetition> ;
+    tab-width get #indentations get 0 max * CHAR: \s <repetition> ;
 
 M: html-prettyprinter print-opening-tag ( tag -- )
     name>>
-- 
2.34.1