No need for abs() in mod
Robert Boone [Tue, 22 May 2007 11:10:14 +0000 (11:10 +0000)]
lib/MooseX/AttributeHelpers/Number.pm

index ee1ebbb..7b9b144 100644 (file)
@@ -33,7 +33,7 @@ has '+method_constructors' => (
             },
             mod => sub {
                 my $attr = shift;
-                return sub { $attr->set_value($_[0], abs($attr->get_value($_[0]) % $_[1])) };
+                return sub { $attr->set_value($_[0], $attr->get_value($_[0]) % $_[1]) };
             },
             abs => sub {
                 my $attr = shift;