From: Chong Yidong Date: Sat, 23 Jan 2010 23:05:16 +0000 (-0500) Subject: * emacs-lisp/advice.el (ad-set-orig-definition): Fix typo (Bug#3541). X-Git-Tag: emacs-pretest-23.1.92~30^2~3^2~9 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=02c6d0d0f29e6628d62910463e5800325f21aebf;p=emacs.git * emacs-lisp/advice.el (ad-set-orig-definition): Fix typo (Bug#3541). --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c87a0495b91..cee15424814 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,7 +1,12 @@ +2010-01-23 Dmitri Paduchikh (tiny change) + + * emacs-lisp/advice.el (ad-set-orig-definition): Fix typo + (Bug#3541). + 2010-01-23 Chong Yidong - * emacs-lisp/assoc.el (aput, adelete, amake): Use lexical-let (Bug#5450). - (aelement): Doc fix. + * emacs-lisp/assoc.el (aelement): Doc fix. + (aput, adelete, amake): Use lexical-let (Bug#5450). 2010-01-23 Stephen Leake diff --git a/lisp/emacs-lisp/advice.el b/lisp/emacs-lisp/advice.el index bac24b63021..003f70ea4a5 100644 --- a/lisp/emacs-lisp/advice.el +++ b/lisp/emacs-lisp/advice.el @@ -2191,7 +2191,7 @@ Redefining advices affect the construction of an advised definition." (defmacro ad-set-orig-definition (function definition) `(ad-safe-fset - (ad-get-advice-info-field function 'origname) ,definition)) + (ad-get-advice-info-field ,function 'origname) ,definition)) (defmacro ad-clear-orig-definition (function) `(fmakunbound (ad-get-advice-info-field ,function 'origname)))