1 files changed, 38 insertions, 0 deletions
diff --git a/config/init-time.el b/config/init-time.el
new file mode 100644
index 0000000..a6932aa
--- /dev/null
+++ b/config/init-time.el
@@ -0,0 +1,38 @@
+;;; init-time.el --- configure time -*- lexical-binding: t -*-
+;; Author: Franck Cuny <franck@fcuny.net>
+
+;;; Commentary:
+
+;; Configure time
+
+;;; Code:
+
+(require 'time)
+
+(setq display-time-mode t)
+(setq display-time-24hr-format t)
+(setq display-time-day-and-date t)
+(setq display-time-default-load-average nil)
+(setq world-clock-list t)
+(setq world-clock-timer-enable t)
+(setq world-clock-timer-second 60)
+;; UTC      => 02:42 +0000  Wednesday 20 April
+;; Berkeley => 19:42 -0700  Tuesday 19 April
+(setq world-clock-time-format "%R %z  %A %d %B")
+(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")))
+
+(add-to-list 'display-buffer-alist '("\\*wclock\\*"
+                                     (display-buffer-in-side-window)
+                                     (side . left)
+                                     (slot . 0)
+                                     (window-width . 0.35)))
+
+(provide 'init-time)
+
+;;; init-time.el ends here