From dad89fb2b79bc7156587ac55b38ba6d86a515723 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Tue, 23 Sep 2008 16:46:50 -0500
Subject: [PATCH] Fix XHTML validation

---
 basis/furnace/chloe-tags/chloe-tags.factor | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/basis/furnace/chloe-tags/chloe-tags.factor b/basis/furnace/chloe-tags/chloe-tags.factor
index 6645e04c93..b67431092c 100644
--- a/basis/furnace/chloe-tags/chloe-tags.factor
+++ b/basis/furnace/chloe-tags/chloe-tags.factor
@@ -72,9 +72,11 @@ CHLOE: a
 
 : compile-hidden-form-fields ( for -- )
     '[
-        _ [ "," split [ hidden render ] each ] when*
-        nested-forms get " " join f like nested-forms-key hidden-form-field
-        [ modify-form ] each-responder
+        <div "display: none;" =style div>
+            _ [ "," split [ hidden render ] each ] when*
+            nested-forms get " " join f like nested-forms-key hidden-form-field
+            [ modify-form ] each-responder
+        </div>
     ] [code] ;
 
 : compile-form-attrs ( method action attrs -- )