From 4779162765c555cbd48f8d0febacab26ae649718 Mon Sep 17 00:00:00 2001 From: Stelian Ionescu Date: Mon, 23 Apr 2012 12:53:26 +0200 Subject: [PATCH] EXPLAIN: call TERPRI on the actual argument --- src/explain.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/explain.lisp b/src/explain.lisp index e29b676..015cdf4 100644 --- a/src/explain.lisp +++ b/src/explain.lisp @@ -61,7 +61,7 @@ (name (test-case f)) (description (test-case f))) (output " ~A.~%" (reason f))) - (terpri *test-dribble*))))) + (terpri stream))))) (defmethod explain ((exp simple-text-explainer) results &optional (stream *test-dribble*) (recursive-depth 0)) -- 1.7.10.4