# HG changeset patch # User Carsten Dominik # Date 1147337376 0 # Node ID af0fd91baddc668772726c6b2e109b2c8f56f953 # Parent 12df553144dfb1b387495bf205ea8f0dbca2ed98 (org-read-date, org-goto-calendar, org-agenda-goto-calendar): Bind `view-calendar-holidays-initially' to nil. diff -r 12df553144df -r af0fd91baddc lisp/textmodes/org.el --- a/lisp/textmodes/org.el Thu May 11 08:48:45 2006 +0000 +++ b/lisp/textmodes/org.el Thu May 11 08:49:36 2006 +0000 @@ -4348,6 +4348,7 @@ (parse-time-string (match-string 1)))) ct)) (calendar-move-hook nil) + (view-calendar-holidays-initially nil) (view-diary-entries-initially nil) (timestr (format-time-string (if with-time "%Y-%m-%d %H:%M" "%Y-%m-%d") default-time)) @@ -4724,6 +4725,7 @@ (interactive "P") (let ((tsr org-ts-regexp) diff (calendar-move-hook nil) + (view-calendar-holidays-initially nil) (view-diary-entries-initially nil)) (if (or (org-at-timestamp-p) (save-excursion @@ -6910,6 +6912,7 @@ (error "Don't know which date to open in calendar"))) (date (calendar-gregorian-from-absolute day)) (calendar-move-hook nil) + (view-calendar-holidays-initially nil) (view-diary-entries-initially nil)) (calendar) (calendar-goto-date date)))