Mercurial > emacs

changeset 70585:af0fd91baddc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(org-read-date, org-goto-calendar, org-agenda-goto-calendar): Bind `view-calendar-holidays-initially' to nil.
author Carsten Dominik <dominik@science.uva.nl>
date Thu, 11 May 2006 08:49:36 +0000
parents 12df553144df
children e7ce4cecd335
files lisp/textmodes/org.el
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- 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)))