X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/920414f2417afbbb37bb38b91ebd8792fb1929cb..598ff2349eb8e3c9fc3a17d14899abe6a1e3c534:/lisp/gnus/pop3.el diff --git a/lisp/gnus/pop3.el b/lisp/gnus/pop3.el index 0b1f5c89d3..1695bbd3a4 100644 --- a/lisp/gnus/pop3.el +++ b/lisp/gnus/pop3.el @@ -34,12 +34,6 @@ (eval-when-compile (require 'cl)) -(eval-and-compile - ;; In Emacs 24, `open-protocol-stream' is an autoloaded alias for - ;; `make-network-stream'. - (unless (fboundp 'open-protocol-stream) - (require 'proto-stream))) - (require 'mail-utils) (defvar parse-time-months) @@ -545,7 +539,7 @@ Returns the process associated with the connection." (erase-buffer) (setq pop3-read-point (point-min)) (setq result - (open-protocol-stream + (open-network-stream "POP" (current-buffer) mailhost port :type (cond ((or (eq pop3-stream-type 'ssl)