diff options
| author | Pavel Janík <Pavel@Janik.cz> | 2001-07-15 16:15:35 +0000 |
|---|---|---|
| committer | Pavel Janík <Pavel@Janik.cz> | 2001-07-15 16:15:35 +0000 |
| commit | 5553563924453df2e3c5bf011bf5b7527172b2f6 (patch) | |
| tree | e879bd365f5e59410cdd640d19d140b17a8029c3 /lisp/gnus/pop3.el | |
| parent | 401aa4797329c34b3691872337b9be2c26e4e020 (diff) | |
| download | emacs-5553563924453df2e3c5bf011bf5b7527172b2f6.tar.gz emacs-5553563924453df2e3c5bf011bf5b7527172b2f6.tar.bz2 emacs-5553563924453df2e3c5bf011bf5b7527172b2f6.zip | |
Some fixes to follow coding conventions in files maintained by FSF.
Diffstat (limited to 'lisp/gnus/pop3.el')
| -rw-r--r-- | lisp/gnus/pop3.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/pop3.el b/lisp/gnus/pop3.el index ed265af8dee..99148388aa8 100644 --- a/lisp/gnus/pop3.el +++ b/lisp/gnus/pop3.el @@ -123,7 +123,7 @@ Used for APOP authentication.") ((equal 'pass pop3-authentication-scheme) (pop3-user process pop3-maildrop) (pop3-pass process)) - (t (error "Invalid POP3 authentication scheme."))) + (t (error "Invalid POP3 authentication scheme"))) (setq message-count (car (pop3-stat process))) (pop3-quit process) message-count)) @@ -293,7 +293,7 @@ If NOW, use that time instead." (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))))) + (error (format "USER %s not valid" user))))) (defun pop3-pass (process) "Send authentication information to the server." |