fix package name for curry::weak AUTOLOAD
Matt S Trout [Mon, 30 Jul 2012 12:34:56 +0000 (12:34 +0000)]
lib/curry.pm

index 544013e..f39fb02 100644 (file)
@@ -19,7 +19,7 @@ use Scalar::Util ();
 sub AUTOLOAD {
   my $invocant = shift;
   Scalar::Util::weaken($invocant) if Scalar::Util::blessed($invocant);
-  my ($method) = our $AUTOLOAD =~ /^curry::(.+)$/;
+  my ($method) = our $AUTOLOAD =~ /^curry::weak::(.+)$/;
   my @args = @_;
   return sub {
     return unless $invocant;