From a329827701a26ea1475212e4b058e90e2409e5b4 Mon Sep 17 00:00:00 2001 From: okada Date: Sat, 12 Aug 2000 08:32:41 +0000 Subject: [PATCH] * elmo-maildir.el (elmo-maildir-delete-folder): Set argument of the function `error'. --- elmo/ChangeLog | 5 +++++ elmo/elmo-maildir.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 57f3dd6..1fcf75f 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,5 +1,10 @@ 2000-08-12 Kenichi OKADA + * elmo-maildir.el (elmo-maildir-delete-folder): Set argument of the + function `error'. + +2000-08-12 Kenichi OKADA + * elmo-pop3.el (elmo-pop3-get-connection): Add `signal'. 2000-08-08 Yuuichi Teranishi diff --git a/elmo/elmo-maildir.el b/elmo/elmo-maildir.el index b88044c..750d322 100644 --- a/elmo/elmo-maildir.el +++ b/elmo/elmo-maildir.el @@ -414,11 +414,11 @@ file name for maildir directories." (lambda (dir) (setq dir (expand-file-name dir basedir)) (if (not (file-directory-p dir)) - (error) + (error nil) (elmo-delete-directory dir t)))) '("new" "cur" "tmp" ".")) t) - (error)))) + (error nil)))) (defun elmo-maildir-search (spec condition &optional from-msgs msgdb) (save-excursion -- 1.7.10.4