2 files changed, 27 insertions, 17 deletions
diff --git a/bard-emacs-modules/bard-emacs-time.el b/bard-emacs-modules/bard-emacs-time.el
new file mode 100644
index 0000000..aa859f9
--- /dev/null
+++ b/bard-emacs-modules/bard-emacs-time.el
@@ -0,0 +1,27 @@
+;; Modeline
+(setq display-time-format "%Y-%m-%d (%A) %H:%M")
+(setq display-time-interval 60)
+(setq display-time-default-load-average nil)
+(setq display-time-mail-directory nil)
+(setq display-time-mail-function nil)
+(setq display-time-use-mail-icon nil)
+(setq display-time-mail-string nil)
+(setq display-time-mail-face nil)
+(setq display-time-string-forms
+      '((propertize
+         (format-time-string display-time-format now)
+         'face 'display-time-date-and-time
+         'help-echo (format-time-string "%a %b %e, %Y" now))
+        " "))
+(display-time-mode 1)
+
+;; world clock
+(setq world-clock-list
+      '(("America/New_York" "New York")
+	("Europe/Moscow" "Moscow")
+	("Europe/London" "London")
+	("Asia/Tokyo" "Tokyo")))
+
+(setq world-clock-time-format "%Y-%m-%d %B (%A) %R %Z")
+
+(provide 'bard-emacs-time)
diff --git a/bard-emacs-modules/bard-emacs-ui.el b/bard-emacs-modules/bard-emacs-ui.el
index 5a5d303..f4b0e03 100644
--- a/bard-emacs-modules/bard-emacs-ui.el
+++ b/bard-emacs-modules/bard-emacs-ui.el
@@ -49,23 +49,6 @@
 
 (setq whitespace-style '(face tabs spaces trailing space-before-tab newline indentation empty space-after-tab space-mark tab-mark))
 
-;; Modeline
-(setq display-time-format "%Y-%m-%d %H:%M")
-(setq display-time-interval 60)
-(setq display-time-default-load-average nil)
-(setq display-time-mail-directory nil)
-(setq display-time-mail-function nil)
-(setq display-time-use-mail-icon nil)
-(setq display-time-mail-string nil)
-(setq display-time-mail-face nil)
-(setq display-time-string-forms
-      '((propertize
-         (format-time-string display-time-format now)
-         'face 'display-time-date-and-time
-         'help-echo (format-time-string "%a %b %e, %Y" now))
-        " "))
-(display-time-mode 1)
-
 ;; Fonts
 
 ;; Removed in favour of fontaine package