* nnrss.el (nnrss-insert-w3): Bind url-package-name and

	url-package-version. Trivial change from Andrew J Cosgriff
	<ajc@polydistortion.net>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dd77139..0875d84 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2002-04-27  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
+       * nnrss.el (nnrss-insert-w3): Bind url-package-name and
+       url-package-version. Trivial change from Andrew J Cosgriff
+       <ajc@polydistortion.net>
+
        * mm-decode.el (mm-save-part): Fill in file name when GUI saving
        attachments. Trivial change from Peter 'Luna' Runestig
        <peter@runestig.com>.

diff --git a/lisp/nnrss.el b/lisp/nnrss.el
index c8adc36..ffb8bb9 100644 (file)
--- a/lisp/nnrss.el
+++ b/lisp/nnrss.el
@@ -450,8 +450,13 @@ ARTICLE is the article number of the current headline.")
   "")
 
 (defun nnrss-insert-w3 (url)
-  (mm-with-unibyte-current-buffer
-    (mm-url-insert url)))
+  (let ((url-package-name 
+        (gnus-replace-in-string 
+         (gnus-replace-in-string gnus-version " v.*$" "")
+         " " ""))
+       (url-package-version gnus-version-number))
+    (mm-with-unibyte-current-buffer
+      (mm-url-insert url))))
 
 (defun nnrss-decode-entities-unibyte-string (string)
   (mm-with-unibyte-buffer