Adds save-match-data.

clojure-emacs · May 24, 2013 · 74f0cd6 · 74f0cd6
1 parent 61ce1d5
commit 74f0cd6
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/clojure-test-mode.el b/clojure-test-mode.el
@@ -528,9 +528,10 @@ Clojure src file for the given test namespace.")
   (let ((regexp clojure-test-regex))
     (save-restriction
       (save-excursion
-        (goto-char (point-min))
-        (when (re-search-forward regexp nil t)
-          (match-string-no-properties 0))))))
+        (save-match-data
+          (goto-char (point-min))
+          (when (re-search-forward regexp nil t)
+            (match-string-no-properties 0)))))))
 
 ;;;###autoload
 (progn