summary refs log tree commit diff stats
path: root/user
diff options
context:
space:
mode:
Diffstat (limited to 'user')
-rw-r--r--user/emacs/.emacs.d/init.el27
1 files changed, 14 insertions, 13 deletions
diff --git a/user/emacs/.emacs.d/init.el b/user/emacs/.emacs.d/init.el
index f426f58f..268682a1 100644
--- a/user/emacs/.emacs.d/init.el
+++ b/user/emacs/.emacs.d/init.el
@@ -85,25 +85,26 @@
               mode-line-client nil
               mode-line-remote nil)
 
+(defvar eyebrowse-lighter-default
+  '(:eval (eyebrowse-mode-line-indicator)))
+(defvar moody-replace-eyebrowse-lighter
+  '(:eval (moody-tab (eyebrowse-mode-line-indicator) 1 'up)))
+(defun moody-replace-eyebrowse (&optional reverse)
+  (interactive "P")
+  (if (assoc 'eyebrowse-mode mode-line-misc-info)
+      (setcdr (assoc 'eyebrowse-mode mode-line-misc-info)
+              (list (if reverse
+                        eyebrowse-lighter-default
+                      moody-replace-eyebrowse-lighter)))
+    (push (list 'eyebrowse-mode moody-replace-eyebrowse-lighter)
+          (cdr (last mode-line-misc-info)))))
+
 (use-package moody
   :config (progn
             (setq x-underline-at-descent-line t)
             (moody-replace-mode-line-buffer-identification)
             (moody-replace-vc-mode)
             (with-eval-after-load 'eyebrowse
-              (defvar eyebrowse-lighter-default
-                '(:eval (eyebrowse-mode-line-indicator)))
-              (defvar moody-replace-eyebrowse-lighter
-                '(:eval (moody-tab (eyebrowse-mode-line-indicator) 1 'up)))
-              (defun moody-replace-eyebrowse (&optional reverse)
-                (interactive "P")
-                (if (assoc 'eyebrowse-mode mode-line-misc-info)
-                (setcdr (assoc 'eyebrowse-mode mode-line-misc-info)
-                        (list (if reverse
-                                  eyebrowse-lighter-default
-                                moody-replace-eyebrowse-lighter)))
-                (push (list 'eyebrowse-mode moody-replace-eyebrowse-lighter)
-                      (cdr (last mode-line-misc-info)))))
               (moody-replace-eyebrowse nil))))
 
 (when (eq system-type 'darwin)