mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-22 07:09:47 +00:00
Code

Only record LAST_REPEAT if it makes sense.

Browse Source 
The definition of "makes sense is here:

- either the user is logging repeats (org-log-repeat)
- or the entry contains clock data, in which case the LAST_REPEAT is
  needed to display clocking time properly.

Request by Dan Griswold, with some support from Bernt Hansen
This commit is contained in:
Carsten Dominik 2010-04-14 13:49:03 +02:00
parent 8788b14378
commit 12e73e58af
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,5 +1,9 @@
2010-04-14 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-auto-repeat-maybe): Only record LAST_REPEAT if
org-log-repeat is non-nil, or if there is clocking data in the
entry.
* org-crypt.el (org-encrypt-entry): Improve mapping behavior.
2010-04-13 Carsten Dominik <carsten.dominik@gmail.com>

5
lisp/org.el
View File

@ -10868,8 +10868,9 @@ This function is run automatically after each state change to a DONE state."
(unless (and to-state (member to-state org-todo-keywords-1))
(setq to-state (if (eq interpret 'type) last-state head)))
(org-todo to-state)
(org-entry-put nil "LAST_REPEAT" (format-time-string
(org-time-stamp-format t t)))
(when (or org-log-repeat (org-entry-get nil "CLOCK"))
(org-entry-put nil "LAST_REPEAT" (format-time-string
(org-time-stamp-format t t))))
(when org-log-repeat
(if (or (memq 'org-add-log-note (default-value 'post-command-hook))
(memq 'org-add-log-note post-command-hook))