diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-08 20:07:11 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-08 20:07:11 +0000 |
commit | dbd1b0a240e81742f12d4fa9574cf883a061b223 (patch) | |
tree | ccc7af4dc05447067d96e9789d0d6389574c4d58 /t/pod | |
parent | 35ef589f8a1ef7477ab32439f10c2e24fb7e16c2 (diff) | |
download | perl-dbd1b0a240e81742f12d4fa9574cf883a061b223.tar.gz |
Integrate change #9624 from maintperl into mainline:
the pod tests were not okay. (t/pod/find.t changes ignored)
p4raw-link: @9624 on //depot/maint-5.6/perl: cf1c4a97376b5a495969381e18662a86af89c73a
p4raw-id: //depot/perl@9643
p4raw-integrated: from //depot/maint-5.6/perl@9642 'copy in'
t/pod/emptycmd.t t/pod/for.t t/pod/headings.t t/pod/include.t
t/pod/included.t t/pod/lref.t t/pod/multiline_items.t
t/pod/nested_items.t t/pod/nested_seqs.t t/pod/oneline_cmds.t
t/pod/pod2usage.t t/pod/poderrs.t t/pod/podselect.t (@7885..)
t/pod/special_seqs.t (@7893..) 'merge in' lib/Pod/Find.pm
(@8727..)
Diffstat (limited to 't/pod')
-rwxr-xr-x | t/pod/emptycmd.t | 6 | ||||
-rwxr-xr-x | t/pod/for.t | 6 | ||||
-rwxr-xr-x | t/pod/headings.t | 6 | ||||
-rwxr-xr-x | t/pod/include.t | 6 | ||||
-rwxr-xr-x | t/pod/included.t | 6 | ||||
-rwxr-xr-x | t/pod/lref.t | 6 | ||||
-rwxr-xr-x | t/pod/multiline_items.t | 6 | ||||
-rwxr-xr-x | t/pod/nested_items.t | 6 | ||||
-rwxr-xr-x | t/pod/nested_seqs.t | 6 | ||||
-rwxr-xr-x | t/pod/oneline_cmds.t | 6 | ||||
-rwxr-xr-x | t/pod/pod2usage.t | 6 | ||||
-rwxr-xr-x | t/pod/poderrs.t | 6 | ||||
-rwxr-xr-x | t/pod/podselect.t | 6 | ||||
-rwxr-xr-x | t/pod/special_seqs.t | 6 |
14 files changed, 42 insertions, 42 deletions
diff --git a/t/pod/emptycmd.t b/t/pod/emptycmd.t index 59e395ea04..815eba2b21 100755 --- a/t/pod/emptycmd.t +++ b/t/pod/emptycmd.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/for.t b/t/pod/for.t index 44af44f17d..4af528a5ab 100755 --- a/t/pod/for.t +++ b/t/pod/for.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/headings.t b/t/pod/headings.t index 78608d0fd9..365aa7d02b 100755 --- a/t/pod/headings.t +++ b/t/pod/headings.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/include.t b/t/pod/include.t index 4e73b78356..b6f1e31a0e 100755 --- a/t/pod/include.t +++ b/t/pod/include.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/included.t b/t/pod/included.t index 4f171c454b..a25b37b98b 100755 --- a/t/pod/included.t +++ b/t/pod/included.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/lref.t b/t/pod/lref.t index 02e2c9e307..1dd8c68b15 100755 --- a/t/pod/lref.t +++ b/t/pod/lref.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/multiline_items.t b/t/pod/multiline_items.t index 0fe410a4e6..334832dff7 100755 --- a/t/pod/multiline_items.t +++ b/t/pod/multiline_items.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/nested_items.t b/t/pod/nested_items.t index c8e9b22427..0b86702ae8 100755 --- a/t/pod/nested_items.t +++ b/t/pod/nested_items.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/nested_seqs.t b/t/pod/nested_seqs.t index 8559f1f25f..9f30533547 100755 --- a/t/pod/nested_seqs.t +++ b/t/pod/nested_seqs.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/oneline_cmds.t b/t/pod/oneline_cmds.t index 28bd1d09e5..bba0e4adbb 100755 --- a/t/pod/oneline_cmds.t +++ b/t/pod/oneline_cmds.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/pod2usage.t b/t/pod/pod2usage.t index cf2c31b83f..70cbacdebc 100755 --- a/t/pod/pod2usage.t +++ b/t/pod/pod2usage.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/poderrs.t b/t/pod/poderrs.t index 8db7d4351c..1b92ede3bb 100755 --- a/t/pod/poderrs.t +++ b/t/pod/poderrs.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testpchk.pl"; import TestPodChecker; } diff --git a/t/pod/podselect.t b/t/pod/podselect.t index 0004548cb7..5d45cdb590 100755 --- a/t/pod/podselect.t +++ b/t/pod/podselect.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } diff --git a/t/pod/special_seqs.t b/t/pod/special_seqs.t index ecd99ecde8..c6b2ce1698 100755 --- a/t/pod/special_seqs.t +++ b/t/pod/special_seqs.t @@ -1,7 +1,7 @@ BEGIN { - use File::Basename; - my $THISDIR = dirname $0; - unshift @INC, $THISDIR; + chdir 't' if -d 't'; + unshift @INC, '../lib'; + unshift @INC, './pod'; require "testp2pt.pl"; import TestPodIncPlainText; } |