Index: emacs/lisp/gnus/pop3.el
diff -c emacs/lisp/gnus/pop3.el:1.29 emacs/lisp/gnus/pop3.el:1.30
*** emacs/lisp/gnus/pop3.el:1.29 Thu Jun 2 11:33:59 2005
--- emacs/lisp/gnus/pop3.el Thu Jun 16 14:57:23 2005
***************
*** 385,391 ****
(pop3-send-command process (format "USER %s" user))
(let ((response (pop3-read-response process t)))
(if (not (and response (string-match "+OK" response)))
! (error (format "USER %s not valid" user)))))
(defun pop3-pass (process)
"Send authentication information to the server."
--- 385,391 ----
(pop3-send-command process (format "USER %s" user))
(let ((response (pop3-read-response process t)))
(if (not (and response (string-match "+OK" response)))
! (error "USER %s not valid" user))))
(defun pop3-pass (process)
"Send authentication information to the server."
_______________________________________________
Emacs-diffs mailing list
Emacs-diffs@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-diffs
