diff options
| author | Raúl Benencia <id@rbenencia.name> | 2023-08-07 21:56:42 -0700 |
|---|---|---|
| committer | Raúl Benencia <id@rbenencia.name> | 2023-08-07 21:56:42 -0700 |
| commit | 1d91655d0eb54cc9f602c0318805fb75c97f6c92 (patch) | |
| tree | dae752054b1859f1afafa52ffdd41b9d6ae34066 /.emacs.d/rul-lisp | |
| parent | d7c3a4e8254af93b65f3a62b366790782ada449a (diff) | |
emacs: format display-time
Diffstat (limited to '.emacs.d/rul-lisp')
| -rw-r--r-- | .emacs.d/rul-lisp/packages/rul-modeline.el | 21 |
1 files changed, 13 insertions, 8 deletions
diff --git a/.emacs.d/rul-lisp/packages/rul-modeline.el b/.emacs.d/rul-lisp/packages/rul-modeline.el index 264719e..a05eeb9 100644 --- a/.emacs.d/rul-lisp/packages/rul-modeline.el +++ b/.emacs.d/rul-lisp/packages/rul-modeline.el @@ -129,14 +129,6 @@ Truncation is done up to `rul-modeline-string-truncate-length'." Read Info node `(elisp) Pixel Specification'.") -;;;; Variables used in the modeline need to be in `risky-local-variable'. -(dolist (construct '( - rul-modeline-major-mode - rul-modeline-misc-info - prot-modeline-align-right - )) - (put construct 'risky-local-variable t)) - ;;;; Miscellaneous (defvar-local rul-modeline-misc-info '(:eval @@ -145,6 +137,19 @@ Read Info node `(elisp) Pixel Specification'.") "Mode line construct displaying `mode-line-misc-info'. Specific to the current window's mode line.") +;;;; Display current time +(setq display-time-format " %a %e %b, %H:%M ") +(setq display-time-default-load-average nil) +(setq display-time-mail-string "") + +;;;; Variables used in the modeline need to be in `risky-local-variable'. +(dolist (construct '( + rul-modeline-major-mode + rul-modeline-misc-info + prot-modeline-align-right + )) + (put construct 'risky-local-variable t)) + ;;;; Finally, define the modeline format (setq-default mode-line-format '("%e" |