diff options
Diffstat (limited to 'tests/misc/base64')
| -rwxr-xr-x | tests/misc/base64 | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/tests/misc/base64 b/tests/misc/base64 index 3276635e8..0428c04c5 100755 --- a/tests/misc/base64 +++ b/tests/misc/base64 @@ -17,16 +17,8 @@ # You should have received a copy of the GNU General Public License # along with this program. If not, see <http://www.gnu.org/licenses/>. -: ${PERL=perl} : ${srcdir=.} - -PROG=`echo $0|sed 's,.*/,,'`; export PROG - -$PERL -e 'use warnings;' > /dev/null 2>&1 || { - echo 1>&2 "$0: configure didn't find a usable version of Perl," \ - "so can't run this test" - exit 77 -} +. $srcdir/../require-perl me=`echo $0|sed 's,.*/,,'` exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF @@ -164,7 +156,7 @@ push @Tests, @new; my $save_temps = $ENV{DEBUG}; my $verbose = $ENV{VERBOSE}; -my $prog = $ENV{PROG} || die "$0: \$PROG not specified in environment\n"; +my $prog = 'base64'; my $fail = run_tests ($program_name, $prog, \@Tests, $save_temps, $verbose); exit $fail; EOF |