replaced busted sed substitution with functioning perl substitutions

[pspp] / tests / command / list.sh

diff --git a/tests/command/list.sh b/tests/command/list.sh
index 1094f61ce840fa7d6d759b9100a17323eb20505f..13801abcbe42d256e2debfed94c8aad7151519ce 100755 (executable)
--- a/tests/command/list.sh
+++ b/tests/command/list.sh
@@ -10,11 +10,13 @@ here=`pwd`;
 # ensure that top_srcdir is absolute
 cd $top_srcdir; top_srcdir=`pwd`
 
-export STAT_CONFIG_PATH=$top_srcdir/config
+STAT_CONFIG_PATH=$top_srcdir/config
+export STAT_CONFIG_PATH
 
 
 cleanup()
 {
+     cd /
      rm -rf $TEMPDIR
 }
 
@@ -57,7 +59,7 @@ list.
 list /format numbered weight.
 
 *** Multiple lines.
-data list file='$top_srcdir/tests/list.data' notable /x000 to x126 1-127.
+data list file='$top_srcdir/tests/list.data' notable /X000 to X126 1-127.
 *list /cases=from 1 to 25 by 5 /format numbered.
 list x000 to x030.
 list /cases=from 1 to 25.