From: yamaoka <yamaoka>
Date: Tue, 12 Sep 2000 01:51:46 +0000 (+0000)
Subject: (elmo-delete-plugged): Fix parenthesis.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=35cfad20eb2f629c93561b1d3964121d135e092f;p=elisp%2Fwanderlust.git

(elmo-delete-plugged): Fix parenthesis.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index b6cf352..37e2dd5 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,7 @@
+2000-09-12  Katsumi Yamaoka    <yamaoka@jpl.org>
+
+	* elmo-util.el (elmo-delete-plugged): Fix parenthesis.
+
 2000-09-11  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* mmelmo-imap4-2.el (mmelmo-imap4-get-mime-entity):
diff --git a/elmo/elmo-util.el b/elmo/elmo-util.el
index 64441ae..e32ae93 100644
--- a/elmo/elmo-util.el
+++ b/elmo/elmo-util.el
@@ -899,7 +899,7 @@ Otherwise treat \\ in NEWTEXT string as special:
 	  (t
 	   ;; delete plugged one port of server
 	   (setq alist
-		 (delete (assoc (cons server port) alist)) alist)))
+		 (delete (assoc (cons server port) alist) alist))))
     alist))
 
 (defun elmo-disk-usage (path)