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))))) |