collapse-spaces ( text -- text' )

Vocabulary

html.parser.printer

Inputs

text

an object

Outputs

text'

an object

Definition

USING: kernel namespaces regexp ;

IN: html.parser.printer

: collapse-spaces ( text -- text' )
    preformatted? get [ R/ \s+/ " " re-replace ] unless ;