summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/macroexp.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2012-09-19 23:29:41 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2012-09-19 23:29:41 -0400
commit7a04bee953b9b74c5ef24691e32c6b6d55ae1e4b (patch)
treeaa8bd67c29f33cc783d66564bae72bde56f9696c /lisp/emacs-lisp/macroexp.el
parente99f70c8cd37778d63e2497ed59d64fda720f731 (diff)
downloademacs-7a04bee953b9b74c5ef24691e32c6b6d55ae1e4b.tar.gz
* lisp/emacs-lisp/macroexp.el (macroexp--expand-all): Fix last change.
Diffstat (limited to 'lisp/emacs-lisp/macroexp.el')
-rw-r--r--lisp/emacs-lisp/macroexp.el2
1 files changed, 1 insertions, 1 deletions
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)))