diff options
Diffstat (limited to 'emacs/site-lisp/modeline-config.el')
| -rw-r--r-- | emacs/site-lisp/modeline-config.el | 30 |
1 files changed, 3 insertions, 27 deletions
diff --git a/emacs/site-lisp/modeline-config.el b/emacs/site-lisp/modeline-config.el index b74a15d..5b1f7e5 100644 --- a/emacs/site-lisp/modeline-config.el +++ b/emacs/site-lisp/modeline-config.el @@ -2,9 +2,6 @@ (provide 'modeline-config) -;; (require 'battery) -;; (display-battery-mode 1) - (use-package doom-modeline :init (doom-modeline-mode 1)) @@ -14,30 +11,9 @@ :custom (minions-prominent-modes '(persp-mode auto-fill-mode eldoc-mode eglot-mode lsp-mode))) -(require 'time) -(setq display-time-day-and-date t) -;; Set up the time timer. -(defun enable-display-time-backend () - "Do the internal bit of `display-time-mode` but without adding it to the -global mode string" - (and display-time-timer (cancel-timer display-time-timer)) - (setq display-time-timer nil) - (setq display-time-string "") - (setq display-time-load-average display-time-default-load-average) - (progn - ;; (or (memq 'display-time-string global-mode-string) - ;; (setq global-mode-string - ;; (append global-mode-string '(display-time-string)))) - ;; Set up the time timer. - (setq display-time-timer - (run-at-time t display-time-interval - 'display-time-event-handler)) - ;; Make the time appear right away. - (display-time-update))) - -;; (enable-display-time-backend) -(display-time-mode 1) -;; there is more in the single-header file +(setq-default global-mode-string '("" (:eval (concat (with-face (format " [%s] " (shorten-path default-directory)) + :weight 'bold + :foreground "green2"))))) ;; ----------------------------------------------------------------------------- ;; telephone line stuff |