[SCM] libtype-tiny-perl Debian packaging branch, master, updated. debian/0.016-1-48-ga7f6748

[Toby Inkster]

The following commit has been merged in the master branch:
commit 41c7013af4a0dd3f479e9a9aa7be06678604804c
Author: Toby Inkster <mail at tobyinkster.co.uk>
Date:   Fri Jul 19 10:24:26 2013 +0100

    check to make sure B::perlstring has not already found its way in there

diff --git a/lib/Devel/TypeTiny/Perl56Compat.pm b/lib/Devel/TypeTiny/Perl56Compat.pm
index 76b7432..8776feb 100644
--- a/lib/Devel/TypeTiny/Perl56Compat.pm
+++ b/lib/Devel/TypeTiny/Perl56Compat.pm
@@ -2,10 +2,9 @@
 
 use B ();
 
-sub B::perlstring
-{
+*B::perlstring = sub {
 	sprintf('"%s"', quotemeta($_[0]))
-}
+} unless exists &B::perlstring;
 
 push @B::EXPORT_OK, 'perlstring';
 

-- 
libtype-tiny-perl Debian packaging