From: Francois Fleuret Date: Wed, 25 Nov 2015 13:07:27 +0000 (+0100) Subject: Update. X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=commitdiff_plain;h=afc6c7f7b111f1c31bc3707ff7aaf4ce11e50e2c;p=elisp.git Update. --- diff --git a/emacs.el b/emacs.el index 6d4ffe8..0d565f1 100644 --- a/emacs.el +++ b/emacs.el @@ -31,10 +31,11 @@ ;; Xft.antialias: true ;; Xft.rgba: rgb +(set-default-font "Inconsolata 15") + ;; (set-default-font "Bitstream vera sans mono-12") ;; (set-default-font "Liberation Mono-13") -(set-default-font "Inconsolata 15") -;; (set-default-font "DejaVu sans mono 11") +;; (set-default-font "DejaVu sans mono 15") ;; (set-default-font "Droid sans mono 13") ;; (set-default-font "Opensans 10") @@ -893,11 +894,17 @@ printer." ;; The battery - (pcase (ff/battery-state ff/battery-dirs) - (`charging (format "c%d%%" (ff/battery-percent))) - (`discharging (format "d%d%%" (ff/battery-percent))) - (`unknown "f") - (_ "?")) + (propertize + (pcase (ff/battery-state ff/battery-dirs) + ;; (`charging (format "c%d%%" (ff/battery-percent))) + ;; (`discharging (format "d%d%%" (ff/battery-percent))) + ;; (`unknown "f") + (`charging (format "↑%d%%" (ff/battery-percent))) + (`discharging (format "↓%d%%" (ff/battery-percent))) + (`unknown "◉") + ;; (`unknown "⚡") + (_ "?")) + 'face '(:foreground "#ffffe0")) ) @@ -925,7 +932,7 @@ printer." (propertize (with-temp-buffer (apply 'call-process x) (buffer-string)) - 'face '(:background "#c0c0ff")) + 'face '(:background "#d0d0ff")) (with-temp-buffer (apply 'call-process x) (buffer-string)) )) @@ -2214,7 +2221,7 @@ This may be a useful alternative binding for \\[delete-other-windows] ;; (load "winner") (winner-mode 1) -(define-key global-map [(shift backspace)] 'winner-undo) +;; (define-key global-map [(shift backspace)] 'winner-undo) ;; (define-key global-map [(shift home)] 'delete-other-windows-vertically) ;; (define-key global-map [(control +)] 'enlarge-window)