summary refs log tree commit diff
path: root/emacs/custom/my-ui.el
diff options
context:
space:
mode:
Diffstat (limited to 'emacs/custom/my-ui.el')
-rw-r--r--emacs/custom/my-ui.el33
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