Mercurial > emacs
comparison lisp/nntp.el @ 13741:9b68e9a5cae1
* nntp.el (nntp-open-server): Enable successful "connectionless"
server switching.
author | Lars Magne Ingebrigtsen <larsi@gnus.org> |
---|---|
date | Sat, 16 Dec 1995 14:54:55 +0000 |
parents | c50d9d86eda9 |
children | 187735b53d52 |
comparison
equal
deleted
inserted
replaced
13740:7868bb1ee05f | 13741:9b68e9a5cae1 |
---|---|
361 (setq nntp-current-server server) | 361 (setq nntp-current-server server) |
362 ;; We have now changed to the proper virtual server. We then | 362 ;; We have now changed to the proper virtual server. We then |
363 ;; check that the physical server is opened. | 363 ;; check that the physical server is opened. |
364 (if (or (nntp-server-opened server) | 364 (if (or (nntp-server-opened server) |
365 connectionless) | 365 connectionless) |
366 () | 366 t |
367 (if (member nntp-address nntp-timeout-servers) | 367 (if (member nntp-address nntp-timeout-servers) |
368 nil | 368 nil |
369 ;; We open a connection to the physical nntp server. | 369 ;; We open a connection to the physical nntp server. |
370 (run-hooks 'nntp-prepare-server-hook) | 370 (run-hooks 'nntp-prepare-server-hook) |
371 (nntp-open-server-semi-internal nntp-address nntp-port-number))))) | 371 (nntp-open-server-semi-internal nntp-address nntp-port-number))))) |