From 57b43866e51ec1e0b0b7241a26b787517f4a058a Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Sat, 18 Jul 2009 10:35:59 +0200 Subject: [PATCH] Bugfix: don't ignore case when building the list of targets. If you have a TODO keyword like "DELEGATED" and an entry like "* Delegated this stuff to X", then you want this entry to be in the list of possible targets. For that we need to distinguish between DELEGATED as a keyword and "Delegated" as a simple word, so (case-fold-search nil) seems relevant. --- lisp/ChangeLog | 3 +++ lisp/org.el | 4 +++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5c229b385..d691ea8db 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2009-07-18 Bastien Guerry + * org.el (org-get-refile-targets): Fix bug: don't ignore case when + building the list of targets. + * org-remember.el (org-remember-delete-empty-lines-at-end): New option. (org-remember-handler): Use the new option. diff --git a/lisp/org.el b/lisp/org.el index 5bbf12dc6..353bb783e 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -8283,7 +8283,9 @@ on the system \"/user@host:\"." (defun org-get-refile-targets (&optional default-buffer) "Produce a table with refile targets." - (let ((entries (or org-refile-targets '((nil . (:level . 1))))) + (let ((case-fold-search nil) + ;; otherwise org confuses "TODO" as a kw and "Todo" as a word + (entries (or org-refile-targets '((nil . (:level . 1))))) targets txt re files f desc descre fast-path-p level pos0) (message "Getting targets...") (with-current-buffer (or default-buffer (current-buffer))