diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-07 18:14:41 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-07 18:14:41 +0000 |
| commit | f695f0e6874001cf0696a1b1ec3411efe80ba2a9 (patch) | |
| tree | 63b751f0277abe85a3109f4e9aaa32e19eb66112 /lib/Benchmark.t | |
| parent | 71a0fcfa4f595293e734533885433c47a0d65f10 (diff) | |
| download | perl-f695f0e6874001cf0696a1b1ec3411efe80ba2a9.tar.gz | |
The #20546 was too ambitious, broke the test.
p4raw-id: //depot/perl@20556
Diffstat (limited to 'lib/Benchmark.t')
| -rw-r--r-- | lib/Benchmark.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Benchmark.t b/lib/Benchmark.t index b4d714931c..8081476785 100644 --- a/lib/Benchmark.t +++ b/lib/Benchmark.t @@ -583,7 +583,7 @@ is_deeply ([keys %Benchmark::Cache], \@before_keys, foreach my $func (@takes_no_args) { eval "$func(42)"; - like( $@, qr/Too many arguments for Benchmark::$func/, "$func usage: with args" ); + is( $@, $usage{$func}, "$func usage: with args" ); } } |