diff options
| -rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/gnus/pop3.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index e933a80199d..3038ef53ef4 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2011-05-02 Lars Magne Ingebrigtsen <larsi@gnus.org> | ||
| 2 | |||
| 3 | * pop3.el (pop3-open-server): Error messages are "-ERR". | ||
| 4 | |||
| 1 | 2011-05-01 Lars Magne Ingebrigtsen <larsi@gnus.org> | 5 | 2011-05-01 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 2 | 6 | ||
| 3 | * pop3.el (pop3-open-server): Upgrade opportunistically to STARTTLS. | 7 | * pop3.el (pop3-open-server): Upgrade opportunistically to STARTTLS. |
diff --git a/lisp/gnus/pop3.el b/lisp/gnus/pop3.el index 3ca5cab76e1..96b2ae17a5a 100644 --- a/lisp/gnus/pop3.el +++ b/lisp/gnus/pop3.el | |||
| @@ -306,7 +306,7 @@ Returns the process associated with the connection." | |||
| 306 | (t | 306 | (t |
| 307 | (or pop3-stream-type 'network))) | 307 | (or pop3-stream-type 'network))) |
| 308 | :capability-command "CAPA\r\n" | 308 | :capability-command "CAPA\r\n" |
| 309 | :end-of-command "^\\.\r?\n\\|^\\+[A-Z]+ .*\n" | 309 | :end-of-command "^\\.\r?\n\\|^\\(-ERR\\|+OK \\).*\n" |
| 310 | :success "^\\+OK.*\n" | 310 | :success "^\\+OK.*\n" |
| 311 | :return-list t | 311 | :return-list t |
| 312 | :starttls-function | 312 | :starttls-function |