aboutsummaryrefslogtreecommitdiff
path: root/bard-emacs-modules/bard-emacs-time.el
diff options
context:
space:
mode:
Diffstat (limited to 'bard-emacs-modules/bard-emacs-time.el')
-rw-r--r--bard-emacs-modules/bard-emacs-time.el27
1 files changed, 27 insertions, 0 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)