r63850 - in /trunk/libtest-deep-perl: CHANGES META.yml Makefile.PL debian/changelog debian/control lib/Test/Deep.pm lib/Test/Deep.pod
ansgar at users.alioth.debian.org
ansgar at users.alioth.debian.org
Sun Oct 17 10:24:10 UTC 2010
Author: ansgar
Date: Sun Oct 17 10:23:57 2010
New Revision: 63850
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=63850
Log:
* New upstream release.
* Update my email address.
Modified:
trunk/libtest-deep-perl/CHANGES
trunk/libtest-deep-perl/META.yml
trunk/libtest-deep-perl/Makefile.PL
trunk/libtest-deep-perl/debian/changelog
trunk/libtest-deep-perl/debian/control
trunk/libtest-deep-perl/lib/Test/Deep.pm
trunk/libtest-deep-perl/lib/Test/Deep.pod
Modified: trunk/libtest-deep-perl/CHANGES
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-deep-perl/CHANGES?rev=63850&op=diff
==============================================================================
--- trunk/libtest-deep-perl/CHANGES (original)
+++ trunk/libtest-deep-perl/CHANGES Sun Oct 17 10:23:57 2010
@@ -1,5 +1,10 @@
-0.170 2009-09-28
+0.108 2009-1015
+
+ simple (stringwise) comparison should now be much faster (thanks,
+ NCLEATON)
+
+0.107 2009-09-28
New maintainer: Ricardo Signes (rjbs)
Modified: trunk/libtest-deep-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-deep-perl/META.yml?rev=63850&op=diff
==============================================================================
--- trunk/libtest-deep-perl/META.yml (original)
+++ trunk/libtest-deep-perl/META.yml Sun Oct 17 10:23:57 2010
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Test-Deep
-version: 0.107
+version: 0.108
abstract: ~
author:
- Fergal Daly <fergal at esatclear.ie>
Modified: trunk/libtest-deep-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-deep-perl/Makefile.PL?rev=63850&op=diff
==============================================================================
--- trunk/libtest-deep-perl/Makefile.PL (original)
+++ trunk/libtest-deep-perl/Makefile.PL Sun Oct 17 10:23:57 2010
@@ -11,25 +11,25 @@
my $tt_prereq = "0.04";
if (eval { require Test::Tester; require Test::Builder; 1 } &&
- $Test::Tester::VERSION <= 0.106 &&
- $Test::Builder::VERSION >= 0.78) {
+ $Test::Tester::VERSION <= 0.106 &&
+ $Test::Builder::VERSION >= 0.78) {
$tt_prereq = "0.107";
}
WriteMakefile(
- AUTHOR => 'Fergal Daly <fergal at esatclear.ie>',
- NAME => 'Test::Deep',
- VERSION_FROM => './lib/Test/Deep.pm',
- PREREQ_PM => {
- 'Test::More' => '0',
- 'Test::Tester' => $tt_prereq,
- 'Test::NoWarnings' => '0.02',
- 'Scalar::Util' => '1.09',
+ AUTHOR => 'Fergal Daly <fergal at esatclear.ie>',
+ NAME => 'Test::Deep',
+ VERSION_FROM => './lib/Test/Deep.pm',
+ PREREQ_PM => {
+ 'Test::More' => '0',
+ 'Test::Tester' => $tt_prereq,
+ 'Test::NoWarnings' => '0.02',
+ 'Scalar::Util' => '1.09',
- # apparently CPAN doesn't get the version of Scalar::Util
- 'List::Util' => '1.09',
- },
+ # apparently CPAN doesn't get the version of Scalar::Util
+ 'List::Util' => '1.09',
+ },
($] < 5.010 ? (INSTALLDIRS => 'perl') : ()),
);
Modified: trunk/libtest-deep-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-deep-perl/debian/changelog?rev=63850&op=diff
==============================================================================
--- trunk/libtest-deep-perl/debian/changelog (original)
+++ trunk/libtest-deep-perl/debian/changelog Sun Oct 17 10:23:57 2010
@@ -1,3 +1,10 @@
+libtest-deep-perl (0.108-1) unstable; urgency=low
+
+ * New upstream release.
+ * Update my email address.
+
+ -- Ansgar Burchardt <ansgar at debian.org> Sun, 17 Oct 2010 12:22:15 +0200
+
libtest-deep-perl (0.107-1) unstable; urgency=low
[ Ryan Niebur ]
Modified: trunk/libtest-deep-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-deep-perl/debian/control?rev=63850&op=diff
==============================================================================
--- trunk/libtest-deep-perl/debian/control (original)
+++ trunk/libtest-deep-perl/debian/control Sun Oct 17 10:23:57 2010
@@ -4,7 +4,7 @@
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: Ernesto Hernández-Novich (USB) <emhn at usb.ve>,
Ryan Niebur <ryan at debian.org>, Jonathan Yu <jawnsy at cpan.org>,
- Ansgar Burchardt <ansgar at 43-1.org>
+ Ansgar Burchardt <ansgar at debian.org>
Build-Depends: debhelper (>= 7)
Build-Depends-Indep: perl, libtest-tester-perl (>= 0.107),
libtest-nowarnings-perl
Modified: trunk/libtest-deep-perl/lib/Test/Deep.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-deep-perl/lib/Test/Deep.pm?rev=63850&op=diff
==============================================================================
--- trunk/libtest-deep-perl/lib/Test/Deep.pm (original)
+++ trunk/libtest-deep-perl/lib/Test/Deep.pm Sun Oct 17 10:23:57 2010
@@ -27,7 +27,7 @@
$Snobby $Expects $DNE $DNE_ADDR $Shallow
);
-$VERSION = '0.107';
+$VERSION = '0.108';
$VERSION = eval $VERSION;
require Exporter;
@@ -49,35 +49,35 @@
# if no sub name is supplied then we use the package name in lower case
my %constructors = (
- Number => "num",
- Methods => "",
- ListMethods => "",
- String => "str",
- Boolean => "bool",
- ScalarRef => "scalref",
- ScalarRefOnly => "",
- Array => "",
- ArrayEach => "array_each",
- ArrayElementsOnly => "",
- Hash => "",
- HashEach => "hash_each",
- Regexp => "re",
- RegexpMatches => "",
- RegexpOnly => "",
- RegexpRef => "",
- Ignore => "",
- Shallow => "",
- Any => "",
- All => "",
- Isa => "Isa",
- RegexpRefOnly => "",
- RefType => "",
- Blessed => "",
- ArrayLength => "",
- ArrayLengthOnly => "",
- HashKeys => "",
- HashKeysOnly => "",
- Code => "",
+ All => "",
+ Any => "",
+ Array => "",
+ ArrayEach => "array_each",
+ ArrayElementsOnly => "",
+ ArrayLength => "",
+ ArrayLengthOnly => "",
+ Blessed => "",
+ Boolean => "bool",
+ Code => "",
+ Hash => "",
+ HashEach => "hash_each",
+ HashKeys => "",
+ HashKeysOnly => "",
+ Ignore => "",
+ Isa => "Isa",
+ ListMethods => "",
+ Methods => "",
+ Number => "num",
+ RefType => "",
+ Regexp => "re",
+ RegexpMatches => "",
+ RegexpOnly => "",
+ RegexpRef => "",
+ RegexpRefOnly => "",
+ ScalarRef => "scalref",
+ ScalarRefOnly => "",
+ Shallow => "",
+ String => "str",
);
while (my ($pkg, $name) = each %constructors)
@@ -256,6 +256,19 @@
{
my ($d1, $d2) = @_;
+ if (!ref $d1 and !ref $d2)
+ {
+ # Shortcut comparison for the non-reference case.
+ if (defined $d1)
+ {
+ return 1 if defined $d2 and $d1 eq $d2;
+ }
+ else
+ {
+ return 1 if !defined $d2;
+ }
+ }
+
if (! $Expects and ref($d1) and UNIVERSAL::isa($d1, "Test::Deep::Cmp"))
{
my $where = $Stack->render('$data');
Modified: trunk/libtest-deep-perl/lib/Test/Deep.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-deep-perl/lib/Test/Deep.pod?rev=63850&op=diff
==============================================================================
--- trunk/libtest-deep-perl/lib/Test/Deep.pod (original)
+++ trunk/libtest-deep-perl/lib/Test/Deep.pod Sun Oct 17 10:23:57 2010
@@ -21,7 +21,7 @@
cmp_deeply(
\@array,
- [$hash1, $hash2, ignore(
+ [$hash1, $hash2, ignore()],
"first 2 elements are as expected, ignoring 3"
);
More information about the Pkg-perl-cvs-commits
mailing list