summary refs log tree commit diff stats
path: root/tag-emacs
diff options
context:
space:
mode:
authorAlan Pearce2014-07-14 20:45:39 +0100
committerAlan Pearce2014-07-14 20:45:39 +0100
commitb1a405303f7f8783b411c45ceef23eaadf7541ed (patch)
tree52f28fd9a4744ab331322661762c6928f2f354e7 /tag-emacs
parent8fd7aee3073cd8baa50767a9c948d47d539b5c71 (diff)
downloaddotfiles-b1a405303f7f8783b411c45ceef23eaadf7541ed.tar.lz
dotfiles-b1a405303f7f8783b411c45ceef23eaadf7541ed.tar.zst
dotfiles-b1a405303f7f8783b411c45ceef23eaadf7541ed.zip
Emacs: refactor rename-modeline
Diffstat (limited to 'tag-emacs')
-rw-r--r--tag-emacs/emacs.d/init.el9
1 files changed, 4 insertions, 5 deletions
diff --git a/tag-emacs/emacs.d/init.el b/tag-emacs/emacs.d/init.el
index 1ff713b..2ae8a96 100644
--- a/tag-emacs/emacs.d/init.el
+++ b/tag-emacs/emacs.d/init.el
@@ -12,10 +12,9 @@
 (load custom-file :noerror)
 
 ;;;; Helper Macros
-(defmacro rename-modeline (package-name mode new-name)
-  `(eval-after-load ,package-name
-     '(defadvice ,mode (after rename-modeline activate)
-        (setq mode-name ,new-name))))
+(defmacro rename-modeline (mode new-name)
+  `(defadvice ,mode (after rename-modeline activate)
+     (setq mode-name ,new-name)))
 
 ;;; Allow lisps to use a common setup. I don't know why they don't have some lispy mode as their parent, but this is close enough
 (defcustom lisp-common-mode-hook nil
@@ -973,7 +972,7 @@
     (set (make-local-variable 'lisp-indent-function)
          #'common-lisp-indent-function))
 
-(rename-modeline "lisp-mode" emacs-lisp-mode "ξ")
+(rename-modeline emacs-lisp-mode "ξ")
 (add-hook 'emacs-lisp-mode-hook #'ap/lisp-setup)
 (add-hook 'emacs-lisp-mode-hook #'turn-on-eldoc-mode)