html.parser.printer: prevent negative indentations.
parent
1d5a598929
commit
8aae6a68a6
|
@ -1,6 +1,6 @@
|
||||||
USING: accessors assocs combinators html.parser
|
USING: accessors assocs combinators html.parser
|
||||||
html.parser.utils io kernel math namespaces sequences strings
|
html.parser.utils io kernel math math.order namespaces sequences
|
||||||
unicode.categories ;
|
strings unicode.categories ;
|
||||||
IN: html.parser.printer
|
IN: html.parser.printer
|
||||||
|
|
||||||
TUPLE: html-printer ;
|
TUPLE: html-printer ;
|
||||||
|
@ -79,7 +79,7 @@ SYMBOL: tagstack
|
||||||
] with-scope ;
|
] with-scope ;
|
||||||
|
|
||||||
: tabs ( -- vseq )
|
: 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 -- )
|
M: html-prettyprinter print-opening-tag ( tag -- )
|
||||||
name>>
|
name>>
|
||||||
|
|
Loading…
Reference in New Issue