Fixed.
authorueno <ueno>
Thu, 18 Aug 2005 08:18:09 +0000 (08:18 +0000)
committerueno <ueno>
Thu, 18 Aug 2005 08:18:09 +0000 (08:18 +0000)
lisp/riece-addon.el

index ee871df..5778e2a 100644 (file)
        (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)))