Mercurial > emacs

diff lisp/gnus/mail-source.el @ 110296:ef15e8533a1c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Remove pop3-movemail and rename pop3-streaming-movemail to pop3-movemail.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Fri, 10 Sep 2010 00:08:31 +0000
parents 6cdcc53703e4
children 6c6f3972c99c
line wrap: on
line diff
--- a/lisp/gnus/mail-source.el	Fri Sep 10 00:07:33 2010 +0000
+++ b/lisp/gnus/mail-source.el	Fri Sep 10 00:08:31 2010 +0000
@@ -34,7 +34,7 @@
   (require 'cl)
   (require 'imap))
 (autoload 'auth-source-user-or-password "auth-source")
-(autoload 'pop3-streaming-movemail "pop3")
+(autoload 'pop3-movemail "pop3")
 (autoload 'pop3-get-message-count "pop3")
 (autoload 'nnheader-cancel-timer "nnheader")
 (require 'mm-util)
@@ -839,11 +839,9 @@
 		     (if (eq authentication 'apop) 'apop 'pass))
 		    (pop3-stream-type stream))
 		(if (or debug-on-quit debug-on-error)
-		    (save-excursion (pop3-streaming-movemail
-				     mail-source-crash-box))
+		    (save-excursion (pop3-movemail mail-source-crash-box))
 		  (condition-case err
-		      (save-excursion (pop3-streaming-movemail
-				       mail-source-crash-box))
+		      (save-excursion (pop3-movemail mail-source-crash-box))
 		    (error
 		     ;; We nix out the password in case the error
 		     ;; was because of a wrong password being given.