Fix case-sensitivity of TODO keywords in imenu

* lisp/org.el (org-imenu-get-tree): Todo keywords are case-sensitive.

Reported-by: Georgiy Tugai <georgiy.tugai@gmail.com>
<http://permalink.gmane.org/gmane.emacs.orgmode/107500>
This commit is contained in:
Nicolas Goaziou 2016-06-01 00:43:28 +02:00
parent 11d6ebc60f
commit a1df8cfe71

View file

@ -25052,7 +25052,8 @@ when non-nil, is a regexp matching keywords names."
"Produce the index for Imenu."
(mapc (lambda (x) (move-marker x nil)) org-imenu-markers)
(setq org-imenu-markers nil)
(let* ((n org-imenu-depth)
(let* ((case-fold-search nil)
(n org-imenu-depth)
(re (concat "^" (org-get-limited-outline-regexp)))
(subs (make-vector (1+ n) nil))
(last-level 0)