Merge pull request #154 from jrblevin/imenu-with-metadata

Don't correct header like statement in metadata

markdown-mode.el

@@ -4817,14 +4817,16 @@ See `imenu-create-index-function' and `imenu--index-alist' for details."
     (save-excursion
       (goto-char (point-min))
       (while (re-search-forward markdown-regex-header (point-max) t)
-        (cond
-         ((setq heading (match-string-no-properties 1))
-          (setq pos (match-beginning 1)))
-         ((setq heading (match-string-no-properties 5))
-          (setq pos (match-beginning 4))))
-        (or (> (length heading) 0)
-            (setq heading empty-heading))
-        (setq index (append index (list (cons heading pos)))))
+        (when (and (not (markdown-code-block-at-point))
+                   (not (markdown-text-property-at-point 'markdown-yaml-metadata-begin)))
+          (cond
+           ((setq heading (match-string-no-properties 1))
+            (setq pos (match-beginning 1)))
+           ((setq heading (match-string-no-properties 5))
+            (setq pos (match-beginning 4))))
+          (or (> (length heading) 0)
+              (setq heading empty-heading))
+          (setq index (append index (list (cons heading pos))))))
       index)))
 
 

tests/markdown-test.el

@@ -3990,6 +3990,25 @@ Detail: https://github.com/jrblevin/markdown-mode/issues/79"
                      (window-start) (window-point))
                     final-win-st-diff)))))))
 
+;; Tests for imenu
+
+(ert-deftest test-markdown-imenu/metadata ()
+  "Don't correct header like statement in metadata.
+https://github.com/jrblevin/markdown-mode/issues/145"
+  (markdown-test-string "---
+title = \"Blah\"
+comments = false
+---
+
+# Header1
+
+## Header2
+"
+    (let ((headers (mapcar #'car (markdown-imenu-create-flat-index))))
+      (should (member "Header1" headers))
+      (should (member "Header2" headers))
+      (should-not (member "comments = false" headers)))))
+
 (provide 'markdown-test)
 
 ;;; markdown-test.el ends here