diff options
| author | Mike Guy <mjtg@cam.ac.uk> | 2002-03-12 16:04:23 +0000 |
|---|---|---|
| committer | Abhijit Menon-Sen <ams@wiw.org> | 2002-03-12 15:16:05 +0000 |
| commit | 7530c94cc4e2a136116a8545073135072061ee62 (patch) | |
| tree | 7376fd5b9b71af76edfabb6df047e01bc8625280 /lib/AutoSplit.t | |
| parent | 659293e7d4ba44b453d05b6b3c67d48aae91bc49 (diff) | |
| download | perl-7530c94cc4e2a136116a8545073135072061ee62.tar.gz | |
Disambiguate "Can't locate"
Message-Id: <E16kolD-0002S0-00@draco.cus.cam.ac.uk>
p4raw-id: //depot/perl@15200
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 7cc680ef75..3e92e4b3cf 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 auto/*MOD*/gonner.al in \@INC!, "Check &*MOD*::gonner is now a gonner") or print "# \$\@='$@'\n"; +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"; ## 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 auto/*MOD*/flying_pig.al in \@INC!, "There are no flying pigs") or print "# \$\@='$@'\n"; +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"; |