diff options
author | Sébastien Delafond <sdelafond@gmail.com> | 2016-12-18 18:15:46 +0100 |
---|---|---|
committer | Sébastien Delafond <sdelafond@gmail.com> | 2016-12-18 18:15:46 +0100 |
commit | 818c794a1dceed58f42fdbd8595da59c383dabb5 (patch) | |
tree | 06f8d269f2791ce9de8c47e1e3016e6ef4b0fef0 /lisp/org-pcomplete.el | |
parent | ec84430cf4e09ba25ec675debdf802bc28111e06 (diff) |
Imported Upstream version 9.0.2
Diffstat (limited to 'lisp/org-pcomplete.el')
-rw-r--r-- | lisp/org-pcomplete.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/org-pcomplete.el b/lisp/org-pcomplete.el index f3b498e..5a52491 100644 --- a/lisp/org-pcomplete.el +++ b/lisp/org-pcomplete.el @@ -315,10 +315,11 @@ This needs more work, to handle headings with lots of spaces in them." (save-excursion (goto-char (point-min)) (let (tbl) - (while (re-search-forward org-todo-line-regexp nil t) - (push (org-make-org-heading-search-string - (match-string-no-properties 3)) - tbl)) + (let ((case-fold-search nil)) + (while (re-search-forward org-todo-line-regexp nil t) + (push (org-make-org-heading-search-string + (match-string-no-properties 3)) + tbl))) (pcomplete-uniqify-list tbl))) (substring pcomplete-stub 1)))) |