aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2013-09-13 00:28:16 -0700
committerGlenn Morris2013-09-13 00:28:16 -0700
commit311273ab7973644d14ffa2e5c0f3516306aa4d6d (patch)
treee35a6b84eef6bea128d7813bdedb72a8c4f15b28
parent96fd6ea2144e30cfb7aae3a3267e349b2e64bc1b (diff)
downloademacs-311273ab7973644d14ffa2e5c0f3516306aa4d6d.tar.gz
emacs-311273ab7973644d14ffa2e5c0f3516306aa4d6d.zip
* lisp/gnus/gnus-spec.el (gnus-xmas-format): Fix weird error call.
-rw-r--r--lisp/gnus/ChangeLog2
-rw-r--r--lisp/gnus/gnus-spec.el3
2 files changed, 4 insertions, 1 deletions
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 @@
12013-09-13 Glenn Morris <rgm@gnu.org> 12013-09-13 Glenn Morris <rgm@gnu.org>
2 2
3 * gnus-spec.el (gnus-xmas-format): Fix weird error call.
4
3 * gnus-html.el (declare-function): Add compat stub for ancient Emacs. 5 * gnus-html.el (declare-function): Add compat stub for ancient Emacs.
4 (image-size): Declare. 6 (image-size): Declare.
5 7
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."
512 (delete-char -1)) 512 (delete-char -1))
513 (t 513 (t
514 (if (null args) 514 (if (null args)
515 (error 'wrong-number-of-arguments #'my-format n fstring)) 515 (signal 'wrong-number-of-arguments
516 (list #'gnus-xmas-format n fstring)))
516 (let* ((minlen (string-to-number (or (match-string 2) ""))) 517 (let* ((minlen (string-to-number (or (match-string 2) "")))
517 (arg (car args)) 518 (arg (car args))
518 (str (if (stringp arg) arg (format "%s" arg))) 519 (str (if (stringp arg) arg (format "%s" arg)))