summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--init.el2
-rw-r--r--lisp/acdw-modeline.el4
2 files changed, 2 insertions, 4 deletions
diff --git a/init.el b/init.el index 421bf9c..e24e971 100644 --- a/init.el +++ b/init.el
@@ -1943,7 +1943,7 @@ browser defined in `browse-url-secondary-browser-function'."
1943 :files ("nyan-mode.el" "img"))) 1943 :files ("nyan-mode.el" "img")))
1944 (:option nyan-animate-nyancat nil 1944 (:option nyan-animate-nyancat nil
1945 nyan-bar-length 20 1945 nyan-bar-length 20
1946 nyan-minimum-window-width fill-column) 1946 nyan-minimum-window-width (+ fill-column (/ nyan-bar-length 2)))
1947 (nyan-mode +1) 1947 (nyan-mode +1)
1948 (defun disable-nyan-mode () 1948 (defun disable-nyan-mode ()
1949 "Disable `nyan-mode' in current buffer." 1949 "Disable `nyan-mode' in current buffer."
diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el index a9020c5..adfcb44 100644 --- a/lisp/acdw-modeline.el +++ b/lisp/acdw-modeline.el
@@ -33,9 +33,7 @@ Otherwise, cdr should be a function that takes two points (see `count-words')."
33 33
34(defun acdw-modeline/buffer-name () ; gonsie 34(defun acdw-modeline/buffer-name () ; gonsie
35 "Display the buffer name in a face reflecting its modified status." 35 "Display the buffer name in a face reflecting its modified status."
36 (propertize (concat " " 36 (propertize (concat (format " %-20s" (truncate-string 20 (buffer-name) "~")))
37 (truncate-string (/ (window-total-width) 2)
38 (buffer-name) "~"))
39 'face 'bold 37 'face 'bold
40 ;; (if (buffer-modified-p) 38 ;; (if (buffer-modified-p)
41 ;; 'font-lock-warning-face 39 ;; 'font-lock-warning-face