From 1faa5b382c6527b01543b3a7f3dd9c4df9017b2f Mon Sep 17 00:00:00 2001 From: bard Date: Thu, 7 Mar 2024 07:14:51 -0500 Subject: misc information changed --- bard-emacs-modules/bard-emacs-ui.el | 22 +++++++++++++++++----- 1 file changed, 17 insertions(+), 5 deletions(-) (limited to 'bard-emacs-modules') 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 "") #'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)) -- cgit v1.2.3