diff lisp/org/org-agenda.el @ 97027:adc2dffbdfc3

2008-07-25 Carsten Dominik <dominik@science.uva.nl> * org-publish.el (org-publish-file): Use the true name of the file. * org-jsinfo.el (org-infojs-handle-options): Use :style-extra instead of :style. * org-exp.el (org-export-plist-vars) (org-export-add-options-to-plist): Handle creator setting flag. (org-export-as-html): Handle attributes also for ftp and mailto links. * org-agenda.el (org-agenda-diary-entry) (org-agenda-execute-calendar-command): Cater for the second argument of `calendar-cursor-to-date'.
author Carsten Dominik <dominik@science.uva.nl>
date Fri, 25 Jul 2008 23:02:16 +0000
parents 60149c696033
children e1cc41b9282d
line wrap: on
line diff
--- a/lisp/org/org-agenda.el	Fri Jul 25 22:33:59 2008 +0000
+++ b/lisp/org/org-agenda.el	Fri Jul 25 23:02:16 2008 +0000
@@ -6,7 +6,7 @@
 ;; Author: Carsten Dominik <carsten at orgmode dot org>
 ;; Keywords: outlines, hypermedia, calendar, wp
 ;; Homepage: http://orgmode.org
-;; Version: 6.06a
+;; Version: 6.06b
 ;;
 ;; This file is part of GNU Emacs.
 ;;
@@ -5120,13 +5120,12 @@
       (unwind-protect
 	  (progn
 	    (fset 'calendar-cursor-to-date
-		  (lambda (&optional error)
+		  (lambda (&optional error dummy)
 		    (calendar-gregorian-from-absolute
 		     (get-text-property point 'day))))
 	      (call-interactively cmd))
 	(fset 'calendar-cursor-to-date oldf)))))
 
-
 (defun org-agenda-execute-calendar-command (cmd)
   "Execute a calendar command from the agenda, with the date associated to
 the cursor position."
@@ -5144,7 +5143,7 @@
       (unwind-protect
 	  (progn
 	    (fset 'calendar-cursor-to-date
-		  (lambda (&optional error)
+		  (lambda (&optional error dummy)
 		    (calendar-gregorian-from-absolute
 		     (get-text-property point 'day))))
 	    (call-interactively cmd))