NPO-Accounting/perl-business-paypal-api
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Move use Cwd; to top with other use statements.

Browse source
This commit is contained in:
Bradley M. Kuhn 2015-01-02 12:49:32 -05:00
parent 938fe1315e
commit 6be85a448e
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
t/OptionFields.t
View file

@ -2,6 +2,7 @@
# -*- mode: cperl -*- # -*- mode: cperl -*-
use Test::More; use Test::More;
use strict; use strict;
use Cwd;
if ( !$ENV{WPP_TEST} || !-f $ENV{WPP_TEST} ) { if ( !$ENV{WPP_TEST} || !-f $ENV{WPP_TEST} ) {
plan skip_all => plan skip_all =>
'No WPP_TEST env var set. Please see README to run tests'; 'No WPP_TEST env var set. Please see README to run tests';
@ -47,7 +48,7 @@ _OPTIONS_PAYMENT_DATA_
; ;
close(OPTIONS_PAY_HTML); die "unable to write options-payment.html: $!" if ($? != 0); close(OPTIONS_PAY_HTML); die "unable to write options-payment.html: $!" if ($? != 0);
use Cwd; my $cwd = getcwd; my $cwd = getcwd;
print STDERR <<"_OPTIONS_LINK_"; print STDERR <<"_OPTIONS_LINK_";
Please note the next series of tests will not succeeed unless there is at Please note the next series of tests will not succeeed unless there is at