From: yamaoka <yamaoka>
Date: Mon, 18 Jun 2001 02:50:19 +0000 (+0000)
Subject: * nnshimbun.el (nnshimbun-find-parameter): Undo the last change. ^^;;
X-Git-Tag: t-gnus-6_15_4-02-quimby-last-~22
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e74b18a04367b0884ba9c402ed0cc1e5cf8c81ee;p=elisp%2Fgnus.git-

* nnshimbun.el (nnshimbun-find-parameter): Undo the last change. ^^;;
---

diff --git a/ChangeLog b/ChangeLog
index 3a9d5de..581eee7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,10 +1,8 @@
 2001-06-18  Katsumi Yamaoka <yamaoka@jpl.org>
 
-	* lisp/nnshimbun.el (nnshimbun-find-parameter): Treat the value
-	nil as `off' for the group parameters `prefetch-articles',
-	`encapsulate-images' and the related variables.
-	(nnshimbun-encapsulate-images): Fix a doc-string that both the
-	values `off' and nil specifies not to encapsulate images.
+	* lisp/nnshimbun.el (nnshimbun-encapsulate-images): Fix a
+	doc-string that both the values `off' and nil specifies not to
+	encapsulate images.
 	(nnshimbun-pre-fetch-article): Default to `off'.
 
 2001-06-18  Katsumi Yamaoka <yamaoka@jpl.org>
diff --git a/lisp/nnshimbun.el b/lisp/nnshimbun.el
index 3668d49..2575167 100644
--- a/lisp/nnshimbun.el
+++ b/lisp/nnshimbun.el
@@ -239,12 +239,12 @@ GROUP has a full name."
 	   `(let ((v (or (plist-get (nnshimbun-find-group-parameters ,name)
 				    'prefetch-articles)
 			 nnshimbun-pre-fetch-article)))
-	      (if (memq v '(off nil)) nil v)))
+	      (if (eq v 'off) nil v)))
 	  ((eq 'encapsulate-images (eval symbol))
 	   `(let ((v (or (plist-get (nnshimbun-find-group-parameters ,name)
 				    'encapsulate-images)
 			 nnshimbun-encapsulate-images)))
-	      (if (memq v '(off nil)) nil v)))
+	      (if (eq v 'off) nil v)))
 	  ((eq 'expiry-wait (eval symbol))
 	   (if full-name-p
 	       `(or (plist-get (nnshimbun-find-group-parameters ,group)