]> gitweb.factorcode.org Git - factor.git/commitdiff
html.streams: fix tests.
authorJohn Benediktsson <mrjbq7@gmail.com>
Tue, 15 Sep 2015 03:32:45 +0000 (20:32 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Tue, 15 Sep 2015 03:32:45 +0000 (20:32 -0700)
basis/html/streams/streams-tests.factor
basis/html/streams/streams.factor

index 6c03d16178e35c8f5d379b3d5840c7c32f9e17f2..354a1c40796ec33d3b9a23a469bed326bbfd0c4e 100644 (file)
@@ -49,7 +49,7 @@ M: funky url-of "http://www.funky-town.com/" swap town>> append ;
     ] make-html-string
 ] unit-test
 
-{ "<div style=\"background-color: #ff00ff; white-space: pre; font-family: monospace; display: inline-block;\">cdr</div>" }
+{ "<div style=\"background-color: #ff00ff; white-space: pre; font-family: monospace; display: inline-block; \">cdr</div>" }
 [
     [
         H{ { page-color T{ rgba f 1 0 1 1 } } }
@@ -57,7 +57,7 @@ M: funky url-of "http://www.funky-town.com/" swap town>> append ;
     ] make-html-string
 ] unit-test
 
-{ "<div style=\"white-space: pre; font-family: monospace; display: inline-block;\"></div><br/>" } [
+{ "<div style=\"white-space: pre; font-family: monospace; display: inline-block; \"></div><br/>" } [
     [ H{ } [ ] with-nesting nl ] make-html-string
 ] unit-test
 
index 978ae1e0ef65b2ea9d29c8d259856a7193565b87..cf413dde1112f30204820f6756ef0c978532b182 100644 (file)
@@ -111,7 +111,7 @@ M: html-span-stream dispose
 : padding-css, ( padding -- )
     first2 (padding-css,) ;
 
-CONSTANT: pre-css "white-space: pre; font-family: monospace;"
+CONSTANT: pre-css "white-space: pre; font-family: monospace; "
 
 : div-css-style ( style -- str )
     [