From 311273ab7973644d14ffa2e5c0f3516306aa4d6d Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 13 Sep 2013 00:28:16 -0700 Subject: [PATCH] * lisp/gnus/gnus-spec.el (gnus-xmas-format): Fix weird error call. --- lisp/gnus/ChangeLog | 2 ++ lisp/gnus/gnus-spec.el | 3 ++- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 4e72ae06f51..5ba1d45e46a 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,7 @@ 2013-09-13 Glenn Morris + * gnus-spec.el (gnus-xmas-format): Fix weird error call. + * gnus-html.el (declare-function): Add compat stub for ancient Emacs. (image-size): Declare. diff --git a/lisp/gnus/gnus-spec.el b/lisp/gnus/gnus-spec.el index 0ff8ec89ac1..a39f185b56d 100644 --- a/lisp/gnus/gnus-spec.el +++ b/lisp/gnus/gnus-spec.el @@ -512,7 +512,8 @@ are supported for %s." (delete-char -1)) (t (if (null args) - (error 'wrong-number-of-arguments #'my-format n fstring)) + (signal 'wrong-number-of-arguments + (list #'gnus-xmas-format n fstring))) (let* ((minlen (string-to-number (or (match-string 2) ""))) (arg (car args)) (str (if (stringp arg) arg (format "%s" arg))) -- 2.39.2