1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/subr.el b/lisp/subr.el
index b2ce0d73125..fb4901711cc 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -748,7 +748,7 @@ Wildcards and redirection are handled as usual in the shell."
 ;; now, but it generates slower code.
 (defmacro save-match-data (&rest body)
   "Execute the BODY forms, restoring the global value of the match data."
-  `(let ((save-match-data-internal '(match-data)))
+  `(let ((save-match-data-internal (match-data)))
        (unwind-protect
            (progn ,@body)
          (store-match-data save-match-data-internal))))