summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorCarsten Dominik <carsten.dominik@gmail.com>2009-02-13 07:35:46 +0100
committerCarsten Dominik <carsten.dominik@gmail.com>2009-02-13 07:35:46 +0100
commitda6fb7448b691e18042aa186bab3fa7eea217cf8 (patch)
treecf7c50aa7362294c8cbd33fb1ebcf64561541641
parentedd2aab5ee5b4e344168ba600d6a84c6032e30b2 (diff)
downloadorg-mode-da6fb7448b691e18042aa186bab3fa7eea217cf8.tar.gz
org-choose: Apply Tom's patch
-rw-r--r--contrib/ChangeLog5
-rw-r--r--contrib/lisp/org-choose.el3
2 files changed, 6 insertions, 2 deletions
diff --git a/contrib/ChangeLog b/contrib/ChangeLog
index c410d34..1e1aae2 100644
--- a/contrib/ChangeLog
+++ b/contrib/ChangeLog
@@ -1,3 +1,8 @@
+2009-02-13 Carsten Dominik <carsten.dominik@gmail.com>
+
+ * lisp/org-choose.el (org-choose-get-fn-map-group): Require
+ `org-agenda'.
+
2009-02-12 Carsten Dominik <carsten.dominik@gmail.com>
* lisp/org-choose.el ("org"): Use file name instead of feature for
diff --git a/contrib/lisp/org-choose.el b/contrib/lisp/org-choose.el
index 8a4d540..baa8584 100644
--- a/contrib/lisp/org-choose.el
+++ b/contrib/lisp/org-choose.el
@@ -273,7 +273,6 @@ interpretation."
(defun org-choose-keep-sensible (change-plist)
"Bring the other items back into a sensible state after an item's
setting was changed."
-
(let*
( (from (plist-get change-plist :from))
(to (plist-get change-plist :to))
@@ -385,6 +384,7 @@ setting was changed."
"Return a function to map over the group"
#'(lambda (fn)
+ (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"))
@@ -421,7 +421,6 @@ If there is none, return 0"
given that another mark has index IX.
DATA must be a `org-choose-mark-data.'."
-
(let
(
(bot-lower-range