customized calendar

init.el

@@ -353,6 +353,28 @@
 ;; make screen flash instead of annoying bell
 (setq visible-bell t)
 
+;; bind super - m to maximize emacs-everywhere
+(global-set-key (kbd "s-m") 'toggle-frame-maximized)
+
+;; for Calendar
+(setq calendar-week-start-day 1)
+
+(setq calendar-intermonth-text
+      '(propertize
+        (format "%2d"
+                (car
+                 (calendar-iso-from-absolute
+                  (calendar-absolute-from-gregorian (list month day year)))))
+        'font-lock-face 'font-lock-warning-face))
+
+(setq calendar-intermonth-header
+      (propertize "W"                  ; or e.g. "KW" in Germany
+                  'font-lock-face 'font-lock-keyword-face))
+
+(calendar-set-date-style 'european)
+
+
+
 ;; flycheck told me to do this:
 (provide 'init)
 ;;; init.el ends here