我用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))))