From: Andreas Schwab <schwab@suse.de>
Date: Mon, 28 Dec 1998 10:10:22 +0000 (+0000)
Subject: (ad-special-forms): Add save-current-buffer
X-Git-Tag: emacs-20.4~1003
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9d52160a5c4cbeb9486b7bba1faeaedadf6d75a0;p=emacs.git

(ad-special-forms): Add save-current-buffer
and track-mouse.
---

diff --git a/lisp/emacs-lisp/advice.el b/lisp/emacs-lisp/advice.el
index 86dde119594..51cc5e74448 100644
--- a/lisp/emacs-lisp/advice.el
+++ b/lisp/emacs-lisp/advice.el
@@ -2474,11 +2474,11 @@ will clear the cache."
 (defvar ad-special-forms
   (mapcar 'symbol-function
 	  '(and catch cond condition-case defconst defmacro
-			       defun defvar function if interactive let let*
-			       or prog1 prog2 progn quote save-excursion
-                               save-restriction save-window-excursion setq
-			       setq-default unwind-protect while
-			       with-output-to-temp-buffer)))
+		defun defvar function if interactive let let*
+		or prog1 prog2 progn quote save-current-buffer
+		save-excursion save-restriction save-window-excursion
+		setq setq-default track-mouse unwind-protect while
+		with-output-to-temp-buffer)))
 
 (defmacro ad-special-form-p (definition)
   ;;"non-nil if DEFINITION is a special form."