Mercurial > emacs
comparison lisp/=nntp.el @ 11143:a9a40def9903
(nntp-request-article): If ID is integer, convert to string.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 28 Mar 1995 16:55:36 +0000 |
parents | 45dc21b49023 |
children |
comparison
equal
deleted
inserted
replaced
11142:41b869bbe0e1 | 11143:a9a40def9903 |
---|---|
387 "" | 387 "" |
388 )) | 388 )) |
389 | 389 |
390 (defun nntp-request-article (id) | 390 (defun nntp-request-article (id) |
391 "Select article by message ID (or number)." | 391 "Select article by message ID (or number)." |
392 (if (numberp id) | |
393 (setq id (number-to-string id))) | |
392 (prog1 | 394 (prog1 |
393 ;; If NEmacs, end of message may look like: "\256\215" (".^M") | 395 ;; If NEmacs, end of message may look like: "\256\215" (".^M") |
394 (nntp-send-command "^\\.\r$" "ARTICLE" id) | 396 (nntp-send-command "^\\.\r$" "ARTICLE" id) |
395 (nntp-decode-text) | 397 (nntp-decode-text) |
396 )) | 398 )) |