Apparently inline styles shouldn't be in comments now.

This commit is contained in:
Eli Barzilay 2010-06-20 05:08:36 -04:00
parent 1fc2a3e171
commit acb86d69f3

View File

@ -170,8 +170,7 @@
(provide style/inline) (provide style/inline)
(define (style/inline . args) (define (style/inline . args)
(let-values ([(attrs body) (attributes+body args)]) (let-values ([(attrs body) (attributes+body args)])
(make-element 'style attrs (make-element 'style attrs `("\n" ,body "\n"))))
`("\n" ,(apply comment #:newlines? #t body) "\n"))))
;; ---------------------------------------------------------------------------- ;; ----------------------------------------------------------------------------
;; Entities ;; Entities