diff options
Diffstat (limited to 'lisp/progmodes/erts-mode.el')
| -rw-r--r-- | lisp/progmodes/erts-mode.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/erts-mode.el b/lisp/progmodes/erts-mode.el index cc9822aaa32..0cb77b30a75 100644 --- a/lisp/progmodes/erts-mode.el +++ b/lisp/progmodes/erts-mode.el @@ -181,7 +181,8 @@ expected results and the actual results in a separate buffer." (ert-test--erts-test (list (cons 'dummy t) (cons 'code (car (read-from-string test-function))) - (cons 'point-char (erts-mode--preceding-spec "Point-Char"))) + (cons 'point-char (save-match-data + (erts-mode--preceding-spec "Point-Char")))) (buffer-file-name)) (:success (message "Test successful")) (ert-test-failed |