X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=tests%2Fformats%2Fib-in.sh;h=3a54c2f0fc8e515f15fa07158c2bfe67296032c7;hb=ff59ee87992b440aab8083ee041f9aecd2ce68ca;hp=e52bf7d17dedef178ae2edcb95d1602d6faec119;hpb=0fa141762183890ebd139ccd9264f08db9011539;p=pspp-builds.git

diff --git a/tests/formats/ib-in.sh b/tests/formats/ib-in.sh
index e52bf7d1..3a54c2f0 100755
--- a/tests/formats/ib-in.sh
+++ b/tests/formats/ib-in.sh
@@ -7,6 +7,7 @@ if [ -z "$top_builddir" ] ; then top_builddir=. ; fi
 if [ -z "$top_srcdir" ] ; then top_srcdir=. ; fi
 top_builddir=`cd $top_builddir; pwd`
 PSPP=$top_builddir/src/ui/terminal/pspp
+: ${PERL:=perl}
 
 # ensure that top_srcdir is absolute
 top_srcdir=`cd $top_srcdir; pwd`
@@ -17,6 +18,10 @@ export STAT_CONFIG_PATH
 
 cleanup()
 {
+     if [ x"$PSPP_TEST_NO_CLEANUP" != x ] ; then 
+	echo "NOT cleaning $TEMPDIR" 
+	return ; 
+     fi
      cd /
      rm -rf $TEMPDIR
 }