latex-imenu-create-index-function: Ignore empty value

1 files changed, 5 insertions, 4 deletions

diff --git a/lisp/km-tex.el b/lisp/km-tex.el
index 15447d3..f3f0727 100644
--- a/lisp/km-tex.el
+++ b/lisp/km-tex.el
@@ -27,7 +27,7 @@
   ;; See `LaTeX-imenu-create-index-function'.
   (TeX-update-style)
   (let ((sec-re (LaTeX-outline-regexp))
-        (title-re "\\*\\{0,1\\}{\\([^}]+\\)}")
+        (title-re "\\*\\{0,1\\}{\\([^}]*\\)}")
         entries)
     (goto-char (point-min))
     (while (re-search-forward sec-re nil t)
@@ -40,9 +40,10 @@
                           "\n" "" (match-string-no-properties 1))))))
         (when (> (length title) 45)
           (setf (substring title 21 -21) "..."))
-        (push (cons (if title (format "%s (%s)" title sec) sec)
-                    (save-excursion (beginning-of-line) (point-marker)))
-              entries)))
+        (when (> (length title) 0)
+          (push (cons (if title (format "%s (%s)" title sec) sec)
+                      (save-excursion (beginning-of-line) (point-marker)))
+                entries))))
     (nreverse entries)))
 
 (provide 'km-tex)