From: David Vázquez <davazp@gmail.com>
Date: Wed, 1 May 2013 21:38:30 +0000 (+0100)
Subject: Declare as special variable *use-html-output-p* in run-tests-in-host
X-Git-Url: http://repo.macrolet.net/gitweb/?p=jscl.git;a=commitdiff_plain;h=cd8f007c90e4852a19b9eb3328aeb549a4102ac3

Declare as special variable *use-html-output-p* in run-tests-in-host
---

diff --git a/jscl.lisp b/jscl.lisp
index c1a8658..aae6ee9 100644
--- a/jscl.lisp
+++ b/jscl.lisp
@@ -92,6 +92,7 @@
 (defun run-tests-in-host ()
   (load "tests.lisp")
   (let ((*use-html-output-p* nil))
+    (declare (special *use-html-output-p*))
     (dolist (input (directory "tests/*.lisp"))
       (load input)))
   (load "tests-report.lisp"))