From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 20 Feb 2003 20:07:41 +0000 (+0000)
Subject: (with-syntax-table): Don't copy the table any more.
X-Git-Tag: ttn-vms-21-2-B4~11110
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7ec51784bb5bf081a967823a1fcc5c5a4fba3a9a;p=emacs.git

(with-syntax-table): Don't copy the table any more.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 01d317238de..39240b601ec 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1709,7 +1709,7 @@ Uses the `derived-mode-parent' property of the symbol to trace backwards."
     parent))
 
 (defmacro with-syntax-table (table &rest body)
-  "Evaluate BODY with syntax table of current buffer set to a copy of TABLE.
+  "Evaluate BODY with syntax table of current buffer set to TABLE.
 The syntax table of the current buffer is saved, BODY is evaluated, and the
 saved table is restored, even in case of an abnormal exit.
 Value is what BODY returns."
@@ -1719,7 +1719,7 @@ Value is what BODY returns."
 	   (,old-buffer (current-buffer)))
        (unwind-protect
 	   (progn
-	     (set-syntax-table (copy-syntax-table ,table))
+	     (set-syntax-table ,table)
 	     ,@body)
 	 (save-current-buffer
 	   (set-buffer ,old-buffer)