diff options
| -rw-r--r-- | local/bibli-paris/bibli-paris.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/local/bibli-paris/bibli-paris.el b/local/bibli-paris/bibli-paris.el index 0822ec1..68955a7 100644 --- a/local/bibli-paris/bibli-paris.el +++ b/local/bibli-paris/bibli-paris.el @@ -399,7 +399,12 @@ STATE (string)." (interactive) (org-map-entries (lambda () (if (equal (org-get-todo-state) "DONE") - (org-archive-subtree))))) + (progn + ;; archiving an entry moves the cursor to next entry + ;; so we move it back to the previous entry + (org-archive-subtree) + (setq org-map-continue-from (outline-get-last-sibling)) + ))))) ;; minor mode |