mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-01 08:17:38 +00:00
Code Issues Releases Activity

* lisp/gnus/gnus-spec.el (gnus-xmas-format): Fix weird error call.

Browse Source
This commit is contained in:
Glenn Morris 2013-09-13 00:28:16 -07:00
parent 96fd6ea214
commit 311273ab79
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/gnus/ChangeLog
View File

@ -1,5 +1,7 @@
2013-09-13 Glenn Morris <rgm@gnu.org>
* gnus-spec.el (gnus-xmas-format): Fix weird error call.
* gnus-html.el (declare-function): Add compat stub for ancient Emacs.
(image-size): Declare.

3
lisp/gnus/gnus-spec.el
View File

@ -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)))