diff options
author | Max Mikhanosha <max@openchat.com> | 2011-07-22 13:35:51 -0400 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2011-07-27 14:59:25 +0200 |
commit | f760b919d51312393d29484e3e7f5b0a23bc952f (patch) | |
tree | fca70d2fa94c1fcf9bb55725cf61ae5b9a96df3a | |
parent | 860caf9f46c7b726c6807b09a4dc3e6f8680b539 (diff) | |
download | org-mode-f760b919d51312393d29484e3e7f5b0a23bc952f.tar.gz |
(org-agenda-set-effort): Refresh changed lines
-rw-r--r-- | lisp/org-agenda.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index dee8f12..e1757bd 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -7426,10 +7426,12 @@ the same tree node, and the headline of the tree node in the Org-mode file." (org-show-context 'agenda)) (save-excursion (and (outline-next-heading) - (org-flag-heading nil))) ; show the next heading + (org-flag-heading nil))) ; show the next heading (goto-char pos) (call-interactively 'org-set-effort) - (end-of-line 1))))) + (end-of-line 1) + (setq newhead (org-get-heading))) + (org-agenda-change-all-lines newhead hdmarker)))) (defun org-agenda-toggle-archive-tag () "Toggle the archive tag for the current entry." |