X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fnntp.el;h=9c9054a49c7c2d71e119578102320bad878fbda6;hb=0007de6d40db139c025a8b2cba9ef04ee4837608;hp=6504f05c9d28f33e03220e8ea7d287d3762e7933;hpb=184ab343047ce20af5af38d2163f7d0a3e3bd0d5;p=gnus diff --git a/lisp/nntp.el b/lisp/nntp.el index 6504f05c9..9c9054a49 100644 --- a/lisp/nntp.el +++ b/lisp/nntp.el @@ -398,7 +398,8 @@ be restored and the command retried." (cond ((looking-at "480") (nntp-handle-authinfo process)) ((looking-at "482") - (nnheader-report 'nntp (get 'nntp-authinfo-rejected 'error-message)) + (nnheader-report 'nntp "%s" + (get 'nntp-authinfo-rejected 'error-message)) (signal 'nntp-authinfo-rejected nil)) ((looking-at "^.*\n") (delete-region (point) (progn (forward-line 1) (point))))) @@ -1411,7 +1412,7 @@ password contained in '~/.nntp-authinfo'." (let ((message (buffer-string))) (while (string-match "[\r\n]+" message) (setq message (replace-match " " t t message))) - (nnheader-report 'nntp message) + (nnheader-report 'nntp "%s" message) message)) (defun nntp-accept-process-output (process)