From 8b5183972ae58dcee440347b55e97805fa7f739c Mon Sep 17 00:00:00 2001 From: Franck Cuny Date: Wed, 27 Apr 2022 19:20:01 -0700 Subject: my-ui: more --- emacs/custom/my-ui.el | 33 ++++++++++++++++----------------- 1 file 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 -- cgit 1.4.1