From 9aeb3b9579dfadaa1921409631940b00ed3d05b9 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Mon, 5 Aug 2013 11:22:09 -0700
Subject: [PATCH] html.parser.printer: fix tests, need to decrement before
 writing.

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

diff --git a/extra/html/parser/printer/printer.factor b/extra/html/parser/printer/printer.factor
index 5e636ef6ff..bfedd2124f 100644
--- a/extra/html/parser/printer/printer.factor
+++ b/extra/html/parser/printer/printer.factor
@@ -88,9 +88,9 @@ M: html-prettyprinter print-opening-tag ( tag -- )
     [ { "br" "img" } member? [ #indentations inc ] unless ] bi ;
 
 M: html-prettyprinter print-closing-tag ( tag -- )
-    [ tabs write "</" write name>> write ">\n" write ]
     ! These tags usually don't have any closing tag associated with them.
-    [ { "br" "img" } member? [ #indentations dec ] unless ] bi ;
+    [ { "br" "img" } member? [ #indentations dec ] unless ]
+    [ tabs write "</" write name>> write ">\n" write ] bi ;
 
 M: html-prettyprinter print-text-tag ( tag -- )
     text>> [ blank? ] trim [ tabs write write "\n" write ] unless-empty ;