aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/subr.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/subr.el b/lisp/subr.el
index 489c4b1c7fa..f4976eeb083 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1095,8 +1095,8 @@ in BODY."
1095The syntax table of the current buffer is saved, BODY is evaluated, and the 1095The syntax table of the current buffer is saved, BODY is evaluated, and the
1096saved table is restored, even in case of an abnormal exit. 1096saved table is restored, even in case of an abnormal exit.
1097Value is what BODY returns." 1097Value is what BODY returns."
1098 (let ((old-table (gensym)) 1098 (let ((old-table (make-symbol "table"))
1099 (old-buffer (gensym))) 1099 (old-buffer (make-symbol "buffer")))
1100 `(let ((,old-table (syntax-table)) 1100 `(let ((,old-table (syntax-table))
1101 (,old-buffer (current-buffer))) 1101 (,old-buffer (current-buffer)))
1102 (unwind-protect 1102 (unwind-protect