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