]> code.delx.au - gnu-emacs/blobdiff - lisp/gnus/pop3.el
Use open-network-stream instead of open-protocol-stream
[gnu-emacs] / lisp / gnus / pop3.el
index 0b1f5c89d3e11cd0a1877dd4e8c0a323de31005d..1695bbd3a403041b4ec7551191ec4848328af005 100644 (file)
 
 (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)