diff options
Diffstat (limited to 'tests/factor')
-rwxr-xr-x | tests/factor/basic | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/factor/basic b/tests/factor/basic index 20cac0dd5..bd2cc0851 100755 --- a/tests/factor/basic +++ b/tests/factor/basic @@ -2,7 +2,7 @@ # -*-perl-*- # Basic tests for "factor". -# Copyright (C) 1998, 1999, 2000, 2003, 2004, 2005 Free Software +# Copyright (C) 1998, 1999, 2000, 2003, 2004, 2005, 2007 Free Software # Foundation, Inc. # This program is free software: you can redistribute it and/or modify @@ -27,8 +27,8 @@ $PERL -e 1 > /dev/null 2>&1 || { exit 77 } -d=$srcdir/.. -exec $PERL -w -I$d -MCoreutils -- - << \EOF +me=`echo $0|sed 's,.*/,,'` +exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - << \EOF require 5.003; use strict; |