From: Dave Rolsky <autarch@urth.org>
Date: Mon, 29 Sep 2008 14:27:20 +0000 (+0000)
Subject: The sugar subs are not called as methods.
X-Git-Tag: 0.59~32
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6daad0b9b4d1188e06c36d67968af3ee6eb07d83;p=gitmo%2FMoose.git

The sugar subs are not called as methods.
---

diff --git a/lib/Moose/Exporter.pm b/lib/Moose/Exporter.pm
index b591d3e..b05fc77 100644
--- a/lib/Moose/Exporter.pm
+++ b/lib/Moose/Exporter.pm
@@ -375,7 +375,7 @@ Moose::Exporter - make an import() and unimport() just like Moose.pm
   );
 
   sub has_rw {
-      my ($caller, $class, $name, %options) = @_;
+      my ($caller, $name, %options) = @_;
       Class::MOP::Class->initialize($caller)->add_attribute($name,
           is => 'rw',
           %options,
@@ -388,7 +388,7 @@ Moose::Exporter - make an import() and unimport() just like Moose.pm
   use MyApp::Moose;
 
   has 'name';
-  sugar1 'do your thing';
+  has_rw 'size';
   thing;
 
   no MyApp::Moose;