ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix a bug in org-choose.el

This commit is contained in:
Carsten Dominik 2009-02-10 10:10:44 +01:00
parent 1ece4e1bcb
commit 6296225ac6
2 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
contrib/ChangeLog
View File

@ -1,3 +1,9 @@
2009-02-10 Carsten Dominik <carsten.dominik@gmail.com>
* lisp/org-choose.el (org-choose-get-fn-map-group): Call
`org-up-heading-all' instead of `outline-up-heading-all', which
does not exist.
2009-02-04 Carsten Dominik <carsten.dominik@gmail.com>
* lisp/org-depend.el (org-depend-act-on-sibling): New macro.

7
contrib/lisp/org-choose.el
View File

@ -386,9 +386,10 @@ setting was changed."
#'(lambda (fn)
(save-excursion
(outline-up-heading-all 1)
(save-restriction
(org-map-entries fn nil 'tree)))))
(unless (org-up-heading-safe)
(error "Chosing is only supported between siblings in a tree, not on top level"))
(save-restriction
(org-map-entries fn nil 'tree)))))
;;;_ . org-choose-get-highest-mark-index