From: Mark Wooding <mdw@distorted.org.uk>
Date: Tue, 22 Mar 2016 01:49:10 +0000 (+0000)
Subject: dot/emacs: Better grip on when `M-x calendar' shows things.
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/profile/commitdiff_plain/8244840ab180822fe9c37f73e4a1137997ef6566

dot/emacs: Better grip on when `M-x calendar' shows things.

Don't show the diary by default usually, but do at startup.  Don't show
holidays at all.
---

diff --git a/dot/emacs b/dot/emacs
index 8ceafea..52a9a1c 100644
--- a/dot/emacs
+++ b/dot/emacs
@@ -436,13 +436,17 @@
 
 ;; Cosmetic stuff.
 
-(setq calendar-view-diary-initially-flag t
-      calendar-view-holidays-initially-flag t)
+(setq calendar-view-diary-initially-flag nil
+      calendar-view-holidays-initially-flag nil
+      calendar-mark-diary-entries-flag t)
 
 (setq display-time-24hr-format t)
 (display-time)
 (column-number-mode 1)
-(trap (if window-system (calendar)))
+(trap
+  (if window-system
+      (let ((calendar-view-diary-initially-flag t))
+	(calendar))))
 
 ;;;--------------------------------------------------------------------------
 ;;; MailCrypt.