diff options
| author | Franck Cuny <franck@fcuny.net> | 2022-04-27 19:20:01 -0700 |
|---|---|---|
| committer | Franck Cuny <franck@fcuny.net> | 2022-04-27 19:20:01 -0700 |
| commit | 8b5183972ae58dcee440347b55e97805fa7f739c (patch) | |
| tree | a16686ea3e366be9aeb0479a82c62046e4c685a0 /emacs/custom | |
| parent | init: ensure packages are installed (diff) | |
| download | emacs.d-8b5183972ae58dcee440347b55e97805fa7f739c.tar.gz | |
my-ui: more
Diffstat (limited to 'emacs/custom')
| -rw-r--r-- | emacs/custom/my-ui.el | 33 |
1 files changed, 16 insertions, 17 deletions
diff --git a/emacs/custom/my-ui.el b/emacs/custom/my-ui.el index 698cc54..59d0b46 100644 --- a/emacs/custom/my-ui.el +++ b/emacs/custom/my-ui.el @@ -45,22 +45,21 @@ (popup . (extrabold intense)))) (load-theme 'modus-operandi t)) -(require 'time) -(setq display-time-24hr-format t) -(setq display-time-day-and-date t) -(setq display-time-format "%a %e %b, %H:%M") -(setq display-time-interval 60) -(setq display-time-default-load-average nil) -(setq zoneinfo-style-world-list - '(("UTC" "UTC") - ("America/Los_Angeles" "Berkeley") - ("America/Denver" "Mountain Time") - ("America/Chicago" "Central Time") - ("America/New_York" "New York") - ("Europe/London" "London") - ("Europe/Paris" "Paris") - ("Asia/Calcutta" "Bangalore") - ("Asia/Tokyo" "Tokyo"))) +(customize-set-variable 'display-time-24hr-format t) +(customize-set-variable 'display-time-day-and-date t) +(customize-set-variable 'display-time-format "%a %e %b, %H:%M") +(customize-set-variable 'display-time-interval 60) +(customize-set-variable 'display-time-default-load-average nil) +(customize-set-variable 'zoneinfo-style-world-list + '(("UTC" "UTC") + ("America/Los_Angeles" "Berkeley") + ("America/Denver" "Mountain Time") + ("America/Chicago" "Central Time") + ("America/New_York" "New York") + ("Europe/London" "London") + ("Europe/Paris" "Paris") + ("Asia/Calcutta" "Bangalore") + ("Asia/Tokyo" "Tokyo"))) ;; the following setup only works with emacs >=28 I think (when (boundp 'world-clock-list) @@ -113,7 +112,7 @@ (side . left) (slot . 0)))) -(add-hook 'help-mode-hook #'visual-line-mode) +(add-hook 'help-mode-hook 'visual-line-mode) (provide 'my-ui) ;;; my-ui.el ends here |