mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
Use open-network-stream instead of open-protocol-stream
* lisp/gnus/nnimap.el: Use open-network-stream instead of open-protocol-stream. * lisp/gnus/nntp.el: Ditto. * lisp/gnus/pop3.el: Ditto. * lisp/gnus/sieve-manage.el: Ditto. * lisp/net/network-stream.el (open-protocol-stream): Make obsolete.
This commit is contained in:
parent
920414f241
commit
598ff2349e
6 changed files with 7 additions and 24 deletions
|
|
@ -25,12 +25,6 @@
|
|||
|
||||
;;; Code:
|
||||
|
||||
(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 'nnheader)
|
||||
(require 'nnoo)
|
||||
(require 'gnus-util)
|
||||
|
|
@ -1266,7 +1260,7 @@ If SEND-IF-FORCE, only send authinfo to the server if the
|
|||
(nntp-open-ssl-stream tls)
|
||||
(nntp-open-tls-stream tls))))
|
||||
(if (assoc nntp-open-connection-function map)
|
||||
(open-protocol-stream
|
||||
(open-network-stream
|
||||
"nntpd" pbuffer nntp-address nntp-port-number
|
||||
:type (cadr (assoc nntp-open-connection-function map))
|
||||
:end-of-command "^\\([2345]\\|[.]\\).*\n"
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue