- (setq dir (nnmail-group-pathname
- (gnus-group-short-name group)
- (gnus-namazu/server-directory method))))
+ (setq dir (let (file-name-handler-alist)
+ (nnmail-group-pathname
+ (gnus-group-short-name group)
+ (gnus-namazu/server-directory method)))))