* .emacs.d/init.el: Extend zoneinfo-style-world-list.

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index fdc7a33..8836a1b 100644 (file)
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -341,7 +341,12 @@ This sets each user option VAR's value to the corresponding VALUE.
    display-time-mail-icon '(image :type xpm
                                   :file "gnus/gnus-pointer.xpm"
                                   :ascent center)
    display-time-mail-icon '(image :type xpm
                                   :file "gnus/gnus-pointer.xpm"
                                   :ascent center)

-   display-time-use-mail-icon t)
+   display-time-use-mail-icon t
+   zoneinfo-style-world-list
+   `(,@zoneinfo-style-world-list
+     ("Etc/UTC" "UTC")
+     ("Asia/Tehran" "Tehran")
+     ("Australia/Melbourne" "Melbourne")))

   (display-time-mode))
 
 (run-with-idle-timer 0.1 nil #'require 'battery)
   (display-time-mode))
 
 (run-with-idle-timer 0.1 nil #'require 'battery)