From: 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/cgi-bin/gitweb.cgi?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 - * 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 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)