* gnus-sum.el (gnus-summary-refer-article): Strip spaces.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6099d87..3276cd3 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2003-10-18  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-sum.el (gnus-summary-refer-article): Strip spaces.
+
        * rfc2047.el (rfc2047-encode-region): Do error out on invalid
        strings. 
 

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 0f52b56..cb610e4 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -8107,6 +8107,7 @@ of what's specified by the `gnus-refer-thread-limit' variable."
   (interactive "sMessage-ID: ")
   (when (and (stringp message-id)
             (not (zerop (length message-id))))
+    (setq message-id (replace-regexp-in-string " " "" message-id))
     ;; Construct the correct Message-ID if necessary.
     ;; Suggested by tale@pawl.rpi.edu.
     (unless (string-match "^<" message-id)