From: Francois Fleuret Date: Tue, 2 Mar 2010 20:16:50 +0000 (+0100) Subject: *** empty log message *** X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=commitdiff_plain;h=52f94a586c35f57ae8566779c4194746cdb3621a;p=elisp.git *** empty log message *** --- diff --git a/emacs.el b/emacs.el index 23ca425..74119d2 100644 --- a/emacs.el +++ b/emacs.el @@ -390,7 +390,6 @@ load-warning buffer in case of failure." :inverse-video nil) (mode-line-inactive :background "gray60" :foreground "black" :box nil :inverse-video nil) - ;; (tex-verbatim :family nil) (region :background "springgreen2") (ff/date-info-face :foreground "white" :weight 'bold) (ff/mail-alarm-face :foreground "red" :weight 'bold) @@ -451,6 +450,7 @@ load-warning buffer in case of failure." :inverse-video nil) ;; (fringe :background "black" :foreground "gray90") (fringe :background "gray65") + (tex-verbatim :family "courrier") (ff/date-info-face :foreground "white" :weight 'bold) (ff/mail-alarm-face :foreground "white" :background "red2") ;; (alarm-vc-face :foreground "black" :background "yellow" :weight 'normal) @@ -846,7 +846,7 @@ printer." (propertize (with-temp-buffer (apply 'call-process x) (buffer-string)) - 'face 'highlight) + 'face '(:background "gray80")) (with-temp-buffer (apply 'call-process x) (buffer-string)) )) @@ -896,6 +896,7 @@ printer." display-time-interval 15 ;; Check every 15s display-time-string-forms `( + ;; (if mail ;; (concat " " ;; (propertize " mail " @@ -2546,7 +2547,9 @@ With argument ARG, do this that many times." (when (ff/load-or-alert "enotes" t) (setq enotes/file "~/private/enotes" enotes/show-help nil - enotes/full-display nil) + enotes/full-display nil + enotes/default-time-fields "9:30") + (enotes/init) ;; (add-hook 'enotes/alarm-hook ;; (lambda () (ff/play-sound-async "~/local/sounds/three_notes2.wav")))