[libmoosex-has-sugar-perl] 01/01: Apply patch from MSCHWERN

[Intrigeri]

This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to annotated tag 0.05070421-source
in repository libmoosex-has-sugar-perl.

commit f383ea555c4319855091b8ee61a3f5c5535c60ad
Author: Kent Fredric <kentfredric at gmail.com>
Date:   Fri Aug 3 22:21:47 2012 +1200

    Apply patch from MSCHWERN
---
 Changes                    | 16 +++++++++++++++-
 t/lib/T4Values/TestCant.pm |  3 ++-
 2 files changed, 17 insertions(+), 2 deletions(-)

diff --git a/Changes b/Changes
index 4e491f1..ac1c709 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,20 @@
-Revision history for {{$dist->name}}
+Revision history for {{$dist->name}}
 
 {{$NEXT}}
+ [Bugs]
+ - Fixed use of a Test::Builder method that is going away. Thanks to Schwern for reporting and providing the patch.
+
+ [Dependencies::Changed]
+ - build requires : Module::Build 0.3601 -> 0.4002
+ - configure requires : Module::Build 0.3601 -> 0.4002
+ - develop recommends : Dist::Zilla::PluginBundle::Author::KENTNL::Lite 0.01009803 -> v1.3.0
+ - develop suggests : Dist::Zilla::PluginBundle::Author::KENTNL v1.2.0 -> v1.4.3
+ - test requires : Test::More 0.88 -> 0.98
+
+ [TODO]
+ - Thinking of adding Moo support of some kind, but Moo is notedly different. Esp: lazy/lazy_build.
+ - I considered making a Moo-style-for-Moose version, but then considered that implementing 'lazy' would have to know what the attribute was called to set the respective Moose builder value, so that is Too Hard. 
+ - Please, if you're reading this and have suggestions/feedback, feel free to hit me up on IRC =).
 
 0.05070420 2012-02-03T03:33:11Z
  - Maintenance/Packaging release.
diff --git a/t/lib/T4Values/TestCant.pm b/t/lib/T4Values/TestCant.pm
index 25c16a2..ed57916 100644
--- a/t/lib/T4Values/TestCant.pm
+++ b/t/lib/T4Values/TestCant.pm
@@ -34,7 +34,8 @@ sub can_unok($@) {
 
   my @nok = ();
   foreach my $method (@methods) {
-    $tb->_try( sub { !$proto->can($method) } ) or push @nok, $method;
+    local ($!,$@);
+    eval { !$proto->can($method) }  or push @nok, $method;
   }
 
   my $name =

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmoosex-has-sugar-perl.git