diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-08 13:55:05 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-08 13:55:05 +0000 |
| commit | f0e510f6e0f6843f5396c2398999dcbdacc7aa4a (patch) | |
| tree | 84a1c87002dffc5019d60aa41c2d17cf9c4bfa2b /lib | |
| parent | 38dcbcb14692b63ada408034166cbddc5f2e25ad (diff) | |
| download | perl-f0e510f6e0f6843f5396c2398999dcbdacc7aa4a.tar.gz | |
The base.pm changes need this, too?
p4raw-id: //depot/perl@16490
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/diagnostics.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/diagnostics.t b/lib/diagnostics.t index 486f8f6dd8..f30f70e073 100644 --- a/lib/diagnostics.t +++ b/lib/diagnostics.t @@ -15,4 +15,4 @@ eval { 'base'->import(qw(I::do::not::exist)); }; -is( $@, '', 'diagnostics not tripped up by "use base qw(Dont::Exist)"' ); +like( $@, qr/^Base class package "I::do::not::exist" is empty/); |