# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 796409736 0
# Node ID a9a40def9903fecf0480ff6d3dca8d1619fbd42a
# Parent  41b869bbe0e1d4e6e6e461e52a4e5a8cee1725d7
(nntp-request-article): If ID is integer, convert to string.

diff -r 41b869bbe0e1 -r a9a40def9903 lisp/=nntp.el
--- a/lisp/=nntp.el	Tue Mar 28 07:38:29 1995 +0000
+++ b/lisp/=nntp.el	Tue Mar 28 16:55:36 1995 +0000
@@ -389,6 +389,8 @@
 
 (defun nntp-request-article (id)
   "Select article by message ID (or number)."
+  (if (numberp id)
+      (setq id (number-to-string id)))
   (prog1
       ;; If NEmacs, end of message may look like: "\256\215" (".^M")
       (nntp-send-command "^\\.\r$" "ARTICLE" id)