X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=bin%2Fdiagnose-view-test;h=efa99f34837620b31fb1333fa01a816a7e72f8d3;hb=89cb348;hp=9841e109e9313719386565d98377ad102ccd8f4f;hpb=43bbc274299e58d2f4a6e0b05e5366ca5e2900ae;p=clnl

diff --git a/bin/diagnose-view-test b/bin/diagnose-view-test
index 9841e10..efa99f3 100755
--- a/bin/diagnose-view-test
+++ b/bin/diagnose-view-test
@@ -11,6 +11,7 @@ sbcl --eval "(asdf:load-system :clnl-test)" --eval "(quit)" &> /dev/null
 runtestfn() {
   sbcl \
     --noinform --disable-ldb --lose-on-corruption --end-runtime-options \
+    --eval "(asdf:initialize-source-registry \`(:source-registry (:tree ,(car (directory \"src\"))) :INHERIT-CONFIGURATION))" \
     --eval "(asdf:load-system :clnl-test)" \
     --eval "(clnl-test::$1 \"$TEST\")" \
     --eval "(quit)" 2> /dev/null | sed -n '/^----$/,$p' | tail -n +2
@@ -44,10 +45,13 @@ scalafiledisplaypid=$!
 display $clfile &
 clfiledisplaypid=$!
 
-echo -n "... and hit enter to finish"
+echo -n "... and hit enter to close scala image"
 read
 
 kill $scalafiledisplaypid
+
+echo -n "... and hit enter to finish"
+read
 kill $clfiledisplaypid
 
 rm $scalafile