From e74b18a04367b0884ba9c402ed0cc1e5cf8c81ee Mon Sep 17 00:00:00 2001 From: yamaoka Date: Mon, 18 Jun 2001 02:50:19 +0000 Subject: [PATCH] * nnshimbun.el (nnshimbun-find-parameter): Undo the last change. ^^;; --- ChangeLog | 8 +++----- lisp/nnshimbun.el | 4 ++-- 2 files changed, 5 insertions(+), 7 deletions(-) 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) -- 1.7.10.4