Index: launch.scm ================================================================== --- launch.scm +++ launch.scm @@ -396,13 +396,16 @@ (system (conc "mkdir -p " lnkpath)) ;; I suspect this section was deleting test directories under some ;; wierd sitations? This doesn't make sense - reenabling the rm -f - (if (file-exists? (conc lnkpath "/" testname)) - (system (conc "rm -f " lnkpath "/" testname))) - (system (conc "ln -sf " dfullp " " lnkpath "/" testname)) + (let ((testlink (conc lnkpath "/" testname))) + (if (and (file-exists? testlink) + (or (regular-file? testlink) + (symbolic-link? testlink))) + (system (conc "rm -f " testlink))) + (system (conc "ln -sf " dfullp " " testlink))) (if (directory? dfullp) (begin (let* ((cmd (conc "rsync -av" (if (> *verbosity* 1) "" "q") " " test-path "/ " dfullp "/")) (status (system cmd))) (if (not (eq? status 0)) Index: tests/tests/ezlog_warn/testconfig ================================================================== --- tests/tests/ezlog_warn/testconfig +++ tests/tests/ezlog_warn/testconfig @@ -1,10 +1,10 @@ [setup] [ezsteps] lookittmp ls /tmp -lookithome ls /home +lookithome ls $HOME [test_meta] author matt owner bob description This test runs two ezsteps the first of which is expected to fail using a simple logpro file.