From 818c794a1dceed58f42fdbd8595da59c383dabb5 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?S=C3=A9bastien=20Delafond?= Date: Sun, 18 Dec 2016 18:15:46 +0100 Subject: Imported Upstream version 9.0.2 --- lisp/org-pcomplete.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'lisp/org-pcomplete.el') 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)))) -- cgit v1.2.3