diff options
Diffstat (limited to 'bard-emacs-modules')
| -rw-r--r-- | bard-emacs-modules/bard-emacs-ui.el | 22 |
1 files changed, 17 insertions, 5 deletions
diff --git a/bard-emacs-modules/bard-emacs-ui.el b/bard-emacs-modules/bard-emacs-ui.el index a50ccc7..8c407a3 100644 --- a/bard-emacs-modules/bard-emacs-ui.el +++ b/bard-emacs-modules/bard-emacs-ui.el @@ -51,8 +51,19 @@ ;; Modeline (setq display-time-format "%Y-%m-%d %H:%M") +(setq display-time-interval 60) (setq display-time-default-load-average nil) -(setq display-time-mail-file nil) +(setq display-time-mail-directory nil) +(setq display-time-mail-function nil) +(setq display-time-use-mail-icon nil) +(setq display-time-mail-string nil) +(setq display-time-mail-face nil) +(setq display-time-string-forms + '((propertize + (format-time-string display-time-format now) + 'face 'display-time-date-and-time + 'help-echo (format-time-string "%a %b %e, %Y" now)) + " ")) (display-time-mode 1) ;; Fonts @@ -97,10 +108,11 @@ (define-key global-map (kbd "<f7>") #'fontaine-set-preset) ;; Switching themes -;; (defun bard/disable-all-themes () -;; "disable all active themes." -;; (dolist (i custom-enabled-themes) -;; (disable-theme i))) +(defun bard/disable-all-themes () + "disable all active themes." + (interactive) + (dolist (i custom-enabled-themes) + (disable-theme i))) ;; (defadvice load-theme (before disable-themes-first activate) ;; (bard/disable-all-themes)) |