diff -u /home/guerry/elisp/testing/org/org.el /home/guerry/elisp/testing/bzg/org.el --- /home/guerry/elisp/testing/org/org.el 2007-09-26 21:00:50.000000000 +0200 +++ /home/guerry/elisp/testing/bzg/org.el 2007-09-28 17:09:30.000000000 +0200 @@ -2199,7 +2199,7 @@ (defcustom org-agenda-skip-scheduled-if-done nil "Non-nil means don't show scheduled items in agenda when they are done. This is relevant for the daily/weekly agenda, not for the TODO list. And -it applied only to the actualy date of the scheduling. Warnings about +it applied only to the actually date of the scheduling. Warnings about an item with a past scheduling dates are always turned off when the item is DONE." :group 'org-agenda-skip @@ -2209,7 +2209,7 @@ "Non-nil means don't show deadines when the corresponding item is done. When nil, the deadline is still shown and should give you a happy feeling. This is relevant for the daily/weekly agenda. And it applied only to the -actualy date of the deadline. Warnings about approching and past-due +actually date of the deadline. Warnings about approching and past-due deadlines are always turned off when the item is DONE." :group 'org-agenda-skip :type 'boolean) @@ -13327,12 +13327,13 @@ ((eq what 'deadline) org-deadline-string) ((eq what 'closed) org-closed-string)) " ") - (org-insert-time-stamp - time - (or org-time-was-given - (and (eq what 'closed) org-log-done-with-time)) - (eq what 'closed) - nil nil (list org-end-time-was-given)) + (setq ts + (org-insert-time-stamp + time + (or org-time-was-given + (and (eq what 'closed) org-log-done-with-time)) + (eq what 'closed) + nil nil (list org-end-time-was-given))) (end-of-line 1)) (goto-char (point-min)) (widen) @@ -17133,7 +17134,7 @@ "Dispatch agenda commands to collect entries to the agenda buffer. Prompts for a character to select a command. Any prefix arg will be passed on to the selected command. The default selections are: -g + a Call `org-agenda-list' to display the agenda for current day or week. t Call `org-todo-list' to display the global todo list. T Call `org-todo-list' to display the global todo list, select only Diff finished. Fri Sep 28 17:09:42 2007