From: ueno <ueno>
Date: Thu, 18 Aug 2005 08:18:09 +0000 (+0000)
Subject: Fixed.
X-Git-Tag: channel-coding-branchpoint~83
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=c4bb3c014f4b3e7b7e5b4773cf6b609092d25384;p=elisp%2Friece.git

Fixed.
---

diff --git a/lisp/riece-addon.el b/lisp/riece-addon.el
index ee871df..5778e2a 100644
--- a/lisp/riece-addon.el
+++ b/lisp/riece-addon.el
@@ -169,9 +169,8 @@
 	(let* ((entry (assq (car pointer) dependencies))
 	       (count (1- (nth 1 entry))))
 	  (if (zerop count)
-	      (progn
-		(setq dependencies (delq entry dependencies)
-		      queue (nconc queue (list entry))))
+	      (setq dependencies (delq entry dependencies)
+		    queue (nconc queue (list entry)))
 	    (setcar (cdr entry) count)))
 	(setq pointer (cdr pointer)))
       (setq queue (cdr queue)))