search

ruricolist / spinneret

Common Lisp HTML5 generator
MIT License
369 stars 26 forks source link

*print-pretty* shouldn't affect output of the :raw elements #29

Closed svetlyak40wt closed 5 years ago

svetlyak40wt commented 5 years ago

Right now, content of the :raw block is wrapped when *print-pretty* is true:

CL-USER> (let ((*print-pretty* t))
                          (spinneret:with-html-string
                            (:raw "Very very very very very very very very very very very very very very very very very very very very very very very very long line")))
"Very very very very very very very very very very very very very very very very
very very very very very very very very long line"
CL-USER>
svetlyak40wt commented 5 years ago

As a workaround you can rebind *print-pretty* before :raw block:

CL-USER> (let ((*print-pretty* t))
           (spinneret:with-html-string
             (let ((*print-pretty* nil))
               (:raw "Very very very very very very very very very very very very very very very very very very very very very very very very long line"))))
" Very very very very very very very very very very very very very very very very very very very very very very very very long line"
CL-USER>

but I think, this issue should be fixed anyway.

svetlyak40wt commented 5 years ago

Also, setting of spinneret::*pre* to t can be used as a workaround:

CL-USER> (let ((*print-pretty* t))
           (spinneret:with-html-string
             (let ((spinneret::*pre* t))
               (:raw "Very very very very very very very very very very very very very very very very very very very very very very very very long line"))))
"Very very very very very very very very very very very very very very very very very very very very very very very very long line"
ruricolist commented 5 years ago

Merged, thanks.