From 548dfeabe3efde797e5afdbe2a800d8d48f8bbbf Mon Sep 17 00:00:00 2001 From: tsuchiya Date: Sun, 2 May 2004 01:47:27 +0000 Subject: [PATCH] Fix the last change. --- lisp/gnus-namazu.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/gnus-namazu.el b/lisp/gnus-namazu.el index f6ab885..7542cac 100644 --- a/lisp/gnus-namazu.el +++ b/lisp/gnus-namazu.el @@ -239,7 +239,7 @@ 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)))) + (gnus-namazu/make-directory-table t)))) ;;; Internal Variable: (defconst gnus-namazu/group-name-regexp "\\`nnvirtual:namazu-search\\?") @@ -367,7 +367,7 @@ This means that the group \"nnimap+server:INBOX.group\" is placed in (setq dir (nnmail-group-pathname (substring group (match-end 0)) "/")) - (push (cons (concat (cdr dir) (substring dir 1)) group) + (push (cons (concat (cdr pair) (substring dir 1)) group) alist))))) gnus-newsrc-hashtb) (dolist (pair (nconc agent cache alist)) -- 1.7.10.4