diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 39bc71e8e13..def47702a73 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2013-03-13 Stefan Monnier + * emacs-lisp/byte-run.el (defun-declarations-alist): Don't use + backquotes for `obsolete' (bug#13929). + * international/mule.el (find-auto-coding): Include file name in obsolescence warning (bug#13922). diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el index 7e1f89871f1..8f0999b2f80 100644 --- a/lisp/emacs-lisp/byte-run.el +++ b/lisp/emacs-lisp/byte-run.el @@ -79,7 +79,8 @@ The return value of this function is not used." (list 'quote f) (list 'quote arglist) (list 'quote when)))) (list 'obsolete #'(lambda (f _args new-name when) - `(make-obsolete ',f ',new-name ,when))) + (list 'make-obsolete + (list 'quote f) (list 'quote new-name) (list 'quote when)))) (list 'compiler-macro #'(lambda (f args compiler-function) ;; FIXME: Make it possible to just reuse `args'.