From 7a04bee953b9b74c5ef24691e32c6b6d55ae1e4b Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 19 Sep 2012 23:29:41 -0400 Subject: [PATCH] * lisp/emacs-lisp/macroexp.el (macroexp--expand-all): Fix last change. --- lisp/ChangeLog | 4 ++++ lisp/emacs-lisp/macroexp.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d2266f9952f..9d9949c3999 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-09-20 Stefan Monnier + + * emacs-lisp/macroexp.el (macroexp--expand-all): Fix last change. + 2012-09-19 Juri Linkov * dired-aux.el (dired-diff): Add (require 'diff) because diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el index 6a84be06728..f9be3e4fcc4 100644 --- a/lisp/emacs-lisp/macroexp.el +++ b/lisp/emacs-lisp/macroexp.el @@ -149,7 +149,7 @@ Assumes the caller has bound `macroexpand-all-environment'." (symbolp (car form)) (get (car form) 'byte-obsolete-info)) (macroexp--funcall-and-return - (lambda () (byte-compile-warn-obsolete ',(car form))) + (lambda () (byte-compile-warn-obsolete (car form))) #'ignore ;FIXME: We should `message' something. new-form) new-form))) -- 2.39.2