35 lines
758 B
Factor
35 lines
758 B
Factor
USING:
|
|
html.parser html.parser.printer
|
|
io.streams.string
|
|
namespaces
|
|
strings
|
|
tools.test ;
|
|
IN: html.parser.printer.tests
|
|
|
|
[
|
|
" "
|
|
] [
|
|
[ 5 #indentations set 2 tab-width set tabs >string ] with-scope
|
|
] unit-test
|
|
|
|
[
|
|
" rel='nofollow' href='http://www.google.com'"
|
|
] [
|
|
H{ { "href" "http://www.google.com" } { "rel" "nofollow" } }
|
|
[ print-attributes ] with-string-writer
|
|
] unit-test
|
|
|
|
[
|
|
"<p>\n Sup dude!\n <br>\n</p>\n"
|
|
] [
|
|
"<p>Sup dude!<br></p>" parse-html [ prettyprint-html ] with-string-writer
|
|
] unit-test
|
|
|
|
! Wrongly nested tags
|
|
[
|
|
"<div>\n <p>\n Sup dude!\n <br>\n </div>\n</p>\n"
|
|
] [
|
|
"<div><p>Sup dude!<br></div></p>" parse-html
|
|
[ prettyprint-html ] with-string-writer
|
|
] unit-test
|