Fix test.
[gnus] / etc / gnus / news-server.ast
1 @title Configuring Gnus for reading news
2 @node Server name and port
3 @variable server :string (gnus-getenv-nntpserver)
4 @variable port :number 119
5 @validate
6 (let* ((error nil)
7        (stream
8         (condition-case err
9             (open-network-stream "nntpd" nil server port)
10           (error (setq error err)))))
11    (if (and (processp stream)
12             (memq (process-status stream) '(open run)))
13        (progn
14          (delete-process stream)
15          nil)
16      error)))
17 @end validate
18 @result gnus-select-method (list server port)
19 @text
20 To read Usenet news with Gnus, you first have to tell
21 Gnus where the news server is.
22
23 The server name is @variable{server}; port number @variable{port}.
24 @end text