From 155247574d4a5e741309bba9c40f636f7e310486 Mon Sep 17 00:00:00 2001 From: Marco Baringer Date: Wed, 18 Jan 2006 11:47:06 +0100 Subject: [PATCH 1/1] minor indentation fix --- src/run.lisp | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/run.lisp b/src/run.lisp index 54a9020..274521e 100644 --- a/src/run.lisp +++ b/src/run.lisp @@ -125,11 +125,11 @@ run.")) (with-run-state (result-list) (bind-run-state ((current-test test)) (labels ((abort-test (e) - (add-result 'unexpected-test-failure - :test-expr nil - :test-case test - :reason (format nil "Unexpected Error: ~S." e) - :condition e)) + (add-result 'unexpected-test-failure + :test-expr nil + :test-case test + :reason (format nil "Unexpected Error: ~S." e) + :condition e)) (run-it () (let ((result-list '())) (declare (special result-list)) -- 1.7.10.4