diff options
| author | Abhijit Menon-Sen <ams@wiw.org> | 2002-03-22 08:36:33 +0000 |
|---|---|---|
| committer | Abhijit Menon-Sen <ams@wiw.org> | 2002-03-22 08:36:33 +0000 |
| commit | ea071790f97e6ff13db5783273c1dae5751ab043 (patch) | |
| tree | 9f27094dc8245ea6c79e88cf235006fddbc40f3f /lib/AutoSplit.t | |
| parent | a6b9a15308fcb171e225c1d3fcbcdd25cdd852bc (diff) | |
| download | perl-ea071790f97e6ff13db5783273c1dae5751ab043.tar.gz | |
Revert #15200 for backwards compatiblity reasons.
p4raw-id: //depot/perl@15411
Diffstat (limited to 'lib/AutoSplit.t')
| -rw-r--r-- | lib/AutoSplit.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/AutoSplit.t b/lib/AutoSplit.t index 3e92e4b3cf..7cc680ef75 100644 --- a/lib/AutoSplit.t +++ b/lib/AutoSplit.t @@ -336,7 +336,7 @@ AutoSplitting *INC**PATHSEP**MOD*.pm (*DIR**PATHSEP**MOD*) *DIR*/*MOD*/flying_pig.al ## Tests is (&*MOD*::skeleton, "bones", "skeleton"); -eval {&*MOD*::gonner}; ok ($@ =~ m!^Can't locate file auto/*MOD*/gonner.al in \@INC!, "Check &*MOD*::gonner is now a gonner") or print "# \$\@='$@'\n"; +eval {&*MOD*::gonner}; ok ($@ =~ m!^Can't locate auto/*MOD*/gonner.al in \@INC!, "Check &*MOD*::gonner is now a gonner") or print "# \$\@='$@'\n"; ## Sleep 4 ## SameAgain @@ -408,4 +408,4 @@ AutoSplitting *INC**PATHSEP**MOD*.pm (*DIR**PATHSEP**MOD*) *DIR*/*MOD*/wraith.al ## Tests is (&*MOD*::wraith, 9); -eval {&*MOD*::flying_pig}; ok ($@ =~ m!^Can't locate file auto/*MOD*/flying_pig.al in \@INC!, "There are no flying pigs") or print "# \$\@='$@'\n"; +eval {&*MOD*::flying_pig}; ok ($@ =~ m!^Can't locate auto/*MOD*/flying_pig.al in \@INC!, "There are no flying pigs") or print "# \$\@='$@'\n"; |