Fixed.
authorDaiki Ueno <ueno@unixuser.org>
Thu, 29 May 2003 23:33:30 +0000 (23:33 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Thu, 29 May 2003 23:33:30 +0000 (23:33 +0000)
lisp/riece.el

index 676fc05..a2f78bf 100644 (file)
@@ -456,7 +456,8 @@ Instead, these commands are available:
                (setq dependencies (delq entry dependencies)
                      queue (nconc queue (list entry))))
            (setcar (cdr entry) count)))
                (setq dependencies (delq entry dependencies)
                      queue (nconc queue (list entry))))
            (setcar (cdr entry) count)))
-       (setq pointer (cdr pointer))))
+       (setq pointer (cdr pointer)))
+      (setq queue (cdr queue)))
     (if dependencies
        (error "Circular dependency found"))
     (while addons
     (if dependencies
        (error "Circular dependency found"))
     (while addons