[SCM] libtype-tiny-perl Debian packaging branch, master, updated. debian/0.016-1-48-ga7f6748
Toby Inkster
mail at tobyinkster.co.uk
Mon Jul 29 12:55:04 UTC 2013
The following commit has been merged in the master branch:
commit 658c9ee18ef47f24d3b5d78057c944162c8ca047
Author: Toby Inkster <mail at tobyinkster.co.uk>
Date: Fri Jul 19 21:30:58 2013 +0100
make Data::Dumper more like B::perlstring()
diff --git a/lib/Devel/TypeTiny/Perl56Compat.pm b/lib/Devel/TypeTiny/Perl56Compat.pm
index 76471ca..8233357 100644
--- a/lib/Devel/TypeTiny/Perl56Compat.pm
+++ b/lib/Devel/TypeTiny/Perl56Compat.pm
@@ -11,7 +11,8 @@ unless (exists &B::perlstring)
require Data::Dumper;
my $d = 'Data::Dumper'->new([])->Indent(0)->Purity(0)->Pad('')->Useqq(1)->Terse(1)->Freezer('')->Toaster('');
*B::perlstring = sub {
- $d->Values([''.shift])->Dump
+ my $perlstring = $d->Values([''.shift])->Dump;
+ ($perlstring =~ /^"/) ? $perlstring : qq["$perlstring"];
};
}
--
libtype-tiny-perl Debian packaging
More information about the Pkg-perl-cvs-commits
mailing list