Fixed.

[riece] / lisp / test / lunit.el

diff --git a/lisp/test/lunit.el b/lisp/test/lunit.el
index 24e0c94..89b4c6a 100644 (file)
--- a/lisp/test/lunit.el
+++ b/lisp/test/lunit.el
@@ -121,7 +121,7 @@
       (nconc (lunit-test-result-failures-internal result)
             (list (cons case (cdr error)))))
      (lunit-test-result-notify
-      result 'lunit-test-listener-failure case failure))
+      result 'lunit-test-listener-failure case (cdr error)))
     (lunit-error
      (lunit-test-result-set-errors-internal
       result