From 1e8ca0572b7e3fe7132100b4e645a45443d5c609 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Thu, 25 Aug 2005 09:49:22 +0000
Subject: [PATCH] Fixed.

---
 lisp/test/test-riece-addon.el |   13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/lisp/test/test-riece-addon.el b/lisp/test/test-riece-addon.el
index b0e39b1..9fae05c 100644
--- a/lisp/test/test-riece-addon.el
+++ b/lisp/test/test-riece-addon.el
@@ -28,15 +28,16 @@
   (lunit-assert-2
    case
    (equal
-    (riece-resolve-addons '(test-riece-addon-1 test-riece-addon-2))
+    (mapcar #'car (riece-resolve-addons
+		   '(test-riece-addon-1 test-riece-addon-2)))
     '(test-riece-addon-3 test-riece-addon-4
 			 test-riece-addon-2 test-riece-addon-1))))
 
 (luna-define-method test-riece-resolve-addons-2 ((case test-riece-addon))
   (lunit-assert-2
    case
-   (equal
-    (condition-case error
-	(riece-resolve-addons '(test-riece-addon-5 test-riece-addon-6))
-      (error (nth 1 error)))
-    "Circular add-on dependency found")))
+   (condition-case error
+       (progn
+	 (riece-resolve-addons '(test-riece-addon-5 test-riece-addon-6))
+	 nil)
+     (error (nth 1 error)))))
-- 
1.7.10.4