(ff/configure-faces
'((italic :underline nil)
(info-title-2 :foreground "green")
+ (font-lock-comment-delimiter-face :foreground "black")
+ (font-lock-comment-face :foreground "black")
(cperl-array-face :background "gray90" :foreground "blue" :weight 'bold)
(cperl-hash-face :background "gray90" :foreground "purple" :weight 'bold)
(diff-added :background "gray90" :foreground "green4" :weight 'bold)
(if (> temp 50)
(concat
(let ((s (format "%dC " temp)))
- (if (> temp 65) (propertize s 'face
+ (if (> temp 70) (propertize s 'face
'font-lock-warning-face)
s))
)
<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\" />
<title></title>
+<style>
+p {
+ color:#009900;
+}
+</style>
</head>
<body>
(defun ff/start-flyspell () (interactive)
(ff/configure-faces
'(
- (flyspell-incorrect :background "#ff0000" :foreground "black")
- (flyspell-duplicate :background "#ff9000" :foreground "black")
+ ;; (flyspell-incorrect :background "#ff0000" :foreground "black")
+ ;; (flyspell-duplicate :background "#ff9000" :foreground "black")
+ (flyspell-incorrect :foreground "#ff0000" :weight 'bold)
+ (flyspell-duplicate :foreground "#ff9000" :weight 'bold)
))
- (flyspell-buffer)
+ ;; (flyspell-buffer)
)
(add-hook 'flyspell-mode-hook 'ff/start-flyspell)