diff options
| author | Jerry D. Hedden <jdhedden@cpan.org> | 2008-07-30 08:54:34 -0400 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2008-07-30 19:51:23 +0000 |
| commit | 85d2acea42af9d6b62e34cceb6911fc1d5ed1a9c (patch) | |
| tree | 6211ea715123753f4bb3e0b0d7d2ad6c39dab66c | |
| parent | 3e927c5026f0e46cdf4094a6823c32e022570507 (diff) | |
| download | perl-85d2acea42af9d6b62e34cceb6911fc1d5ed1a9c.tar.gz | |
Version bump for Data::Dumper
From: "Jerry D. Hedden" <jdhedden@cpan.org>
Message-ID: <1ff86f510807300954y5451ce9eq3181169e83bc3a10@mail.gmail.com>
p4raw-id: //depot/perl@34165
| -rw-r--r-- | ext/Data/Dumper/Dumper.pm | 2 | ||||
| -rw-r--r-- | ext/Data/Dumper/t/bugs.t | 13 |
2 files changed, 13 insertions, 2 deletions
diff --git a/ext/Data/Dumper/Dumper.pm b/ext/Data/Dumper/Dumper.pm index fe1882f041..1d88e1f093 100644 --- a/ext/Data/Dumper/Dumper.pm +++ b/ext/Data/Dumper/Dumper.pm @@ -9,7 +9,7 @@ package Data::Dumper; -$VERSION = '2.121_16'; +$VERSION = '2.121_17'; #$| = 1; diff --git a/ext/Data/Dumper/t/bugs.t b/ext/Data/Dumper/t/bugs.t index 42931ee746..ad58d6a6f8 100644 --- a/ext/Data/Dumper/t/bugs.t +++ b/ext/Data/Dumper/t/bugs.t @@ -16,7 +16,7 @@ BEGIN { } use strict; -use Test::More tests => 3; +use Test::More tests => 4; use Data::Dumper; { @@ -59,3 +59,14 @@ ok(1, "[perl #38612]"); # Still no core dump? We are fine. eval $txt; is_deeply($VAR1, \%h, '[perl #40668] Reset hash iterator'); } + +# [perl #56766] Segfaults on bad syntax - fixed with version 2.121_17 +sub doh +{ + # 2nd arg is supposed to be an arrayref + my $doh = Data::Dumper->Dump([\@_],'@_'); +} +doh('fixed'); +ok(1, "[perl #56766]"); # Still no core dump? We are fine. + +# EOF |