Ticket #890: colorize-bugfix.patch
File colorize-bugfix.patch, 634 bytes (added by , 12 years ago) |
---|
-
hyde.scm
134 134 135 135 (define (colorize-code language code) 136 136 (let* ((class (conc "highlight " language "-language")) 137 (code ( handle-exceptions exn138 code 139 (map (lambda (s)140 (html-colorize language s))141 code))))137 (code (map (lambda (s) 138 (handle-exceptions exn 139 (htmlize s) 140 (html-colorize language s))) 141 code))) 142 142 143 143 `(pre (@ (class ,class)) (inject . ,code)))) 144 144