Browse Source

Control case sensitivity in index generation

Carsten Dominik 15 years ago
parent
commit
7cfba5b16b
2 changed files with 7 additions and 1 deletions
  1. 5 0
      lisp/ChangeLog
  2. 2 1
      lisp/org-publish.el

+ 5 - 0
lisp/ChangeLog

@@ -1,3 +1,8 @@
+2010-04-04  Carsten Dominik  <carsten.dominik@gmail.com>
+
+	* org-publish.el (org-publish-aux-preprocess): Control case
+	sensitivity.
+
 2010-04-04  Bastien Guerry  <bzg@altern.org>
 
 	* org.el (org-splice-latex-header): Fix typo.

+ 2 - 1
lisp/org-publish.el

@@ -724,7 +724,8 @@ the project."
 (defvar backend) ; dynamically scoped
 (defun org-publish-aux-preprocess ()
   "Find index entries and write them to an .orgx file."
-  (let (entry index target)
+  (let ((case-fold-search t)
+	entry index target)
     (goto-char (point-min))
     (while
 	(and