# HG changeset patch # User Juanma Barranquero # Date 1118933213 0 # Node ID 980e418a44ee87000799c72741791de0abeb9e85 # Parent eb8609914b2b2216d3b124a8a00923b9cc38089b (gnus-score-customize): Don't use `format' on `error' arguments. diff -r eb8609914b2b -r 980e418a44ee lisp/gnus/gnus-cus.el --- a/lisp/gnus/gnus-cus.el Thu Jun 16 14:45:59 2005 +0000 +++ b/lisp/gnus/gnus-cus.el Thu Jun 16 14:46:53 2005 +0000 @@ -772,8 +772,8 @@ This can be changed using the `\\[gnus-score-change-score-file]' command." (interactive (list gnus-current-score-file)) (unless file - (error (format "No score file for %s" - (gnus-group-decoded-name gnus-newsgroup-name)))) + (error "No score file for %s" + (gnus-group-decoded-name gnus-newsgroup-name))) (let ((scores (gnus-score-load file)) (types (mapcar (lambda (entry) `(group :format "%v%h\n" @@ -1014,9 +1014,9 @@ ;; gnus-agent-cat-prepare-category-field as I don't want the ;; group list to appear when customizing a topic. (widget-insert "\n") - - (let ((symb - (set + + (let ((symb + (set (make-local-variable 'gnus-agent-cat-groups) (widget-create `(choice