From: tsuchiya <tsuchiya>
Date: Sun, 2 May 2004 02:11:06 +0000 (+0000)
Subject: (gnus-namazu-remote-groups): Call `gnus-namazu/make-directory-table'
X-Git-Tag: t-gnus-6_17_4-quimby-~948
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7e7f03e85884c0e0d784ae0201f6f8891ae5632c;p=elisp%2Fgnus.git-

(gnus-namazu-remote-groups): Call `gnus-namazu/make-directory-table'
only when `gnus-namazu' has already been loaded, in order to avoid
cyclic evaluation.
---

diff --git a/lisp/gnus-namazu.el b/lisp/gnus-namazu.el
index 7542cac..5bb0ff7 100644
--- a/lisp/gnus-namazu.el
+++ b/lisp/gnus-namazu.el
@@ -239,7 +239,8 @@ This means that the group \"nnimap+server:INBOX.group\" is placed in
 		(string :tag "Base path of groups")))
   :set (lambda (symbol value)
 	 (prog1 (set-default symbol value)
-	   (gnus-namazu/make-directory-table t))))
+	   (when (featurep 'gnus-namazu)
+	     (gnus-namazu/make-directory-table t)))))
 
 ;;; Internal Variable:
 (defconst gnus-namazu/group-name-regexp "\\`nnvirtual:namazu-search\\?")