diff options
| author | Carsten Dominik <carsten.dominik@gmail.com> | 2009-04-08 15:12:20 +0200 |
|---|---|---|
| committer | Carsten Dominik <carsten.dominik@gmail.com> | 2009-04-08 15:12:20 +0200 |
| commit | 31446d85a32eaea0d5028149b418199989fe86a5 (patch) | |
| tree | 1c0ded3e403b2b7fa43ba9a33ee7a9aad1e32360 | |
| parent | 978ac28e9fa4600ac4927a87123b3e7c561ca916 (diff) | |
| download | org-mode-31446d85a32eaea0d5028149b418199989fe86a5.tar.gz | |
org-choose.el: Fix bug.
| -rw-r--r-- | contrib/ChangeLog | 5 | ||||
| -rw-r--r-- | contrib/lisp/org-choose.el | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/contrib/ChangeLog b/contrib/ChangeLog index c414dec..6b9a06a 100644 --- a/contrib/ChangeLog +++ b/contrib/ChangeLog @@ -1,3 +1,8 @@ +2009-04-08 Carsten Dominik <carsten.dominik@gmail.com> + + * lisp/org-choose.el (org-choose-get-fn-map-group): Fix bug with + level selection. + 2009-04-01 Carsten Dominik <carsten.dominik@gmail.com> * lisp/org-exp-bibtex.el (org-export-bibtex-preprocess): Handle diff --git a/contrib/lisp/org-choose.el b/contrib/lisp/org-choose.el index 1c72ebb..ca745b9 100644 --- a/contrib/lisp/org-choose.el +++ b/contrib/lisp/org-choose.el @@ -388,9 +388,9 @@ setting was changed." (require 'org-agenda) ;; `org-map-entries' seems to need it. (save-excursion (unless (org-up-heading-safe) - (error "Chosing is only supported between siblings in a tree, not on top level")) + (error "Choosing is only supported between siblings in a tree, not on top level")) (let - ((level (org-reduced-level (org-outline-level)))) + ((level (1+ (org-reduced-level (org-outline-level))))) (save-restriction (org-map-entries fn |