* lisp/emacs-lisp/byte-run.el (defun-declarations-alist): Don't use

backquotes for `obsolete'.

Fixes: debbugs:13929

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 39bc71e8e131104992a8982d87fc901fe38af264..def47702a731ddf64cf6679c3dde6076dbfe8150 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2013-03-13  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * 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 7e1f89871f155de266c5b05c2e42d821e47bceb2..8f0999b2f8016cc6bf917dff165af5d215d7e30c 100644 (file)
--- 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'.