我用emacs的htmlize.el elisp来给代码上色,默认情况下并没有设置成为等宽字体,所以显示上不太好看,为htmlize默认添加输出为等宽字体:

1
2
3
4
5
(defun htmlize-font-pre-tag (face-map)
(let ((fstruct (gethash 'default face-map)))
(format "<pre style="font-family: 'courier new', courier;color:%s;background-color:%s">"
(htmlize-fstruct-foreground fstruct)
(htmlize-fstruct-background fstruct)))
)

知识共享授权条款
本著作Chen, Zai-Chun制作,以知识共享 姓名标示-相同方式分享 4.0 国际 授权条款释出

留言

May 31 2010