1 package MooseX::HasDefaults;
4 die "Do not use MooseX::HasDefaults, use MooseX::HasDefaults::RO or MooseX::HasDefaults::RW";
6 "Screw you Perl, I want to return a true value just to spite you even though it's a load failure. Can we PLEASE get rid of the required module return value? Require modules to die instead, like I just did. SIGH!";
12 MooseX::HasDefaults - default "is" to "ro" or "rw" for all attributes
18 use MooseX::HasDefaults::RO;
27 documentation => "Changes most years",
32 The module L<MooseX::HasDefaults::RO> defaults C<is> to C<ro>.
34 The module L<MooseX::HasDefaults::RW> defaults C<is> to C<rw>.
36 If you pass a specific value to any C<has>'s C<is>, that overrides the default. If you do not want an accessor, pass C<< is => undef >>.
40 Shawn M Moore, C<sartak@gmail.com>
46 =item L<MooseX::AttributeDefaults>
48 This requires its users to be MOP savvy, and is a bit too much typing for
49 the common case of defaulting C<is>.
51 =item L<MooseX::Attributes::Curried>
53 This solves a similar need by letting users create sugar functions. But
58 =head1 COPYRIGHT AND LICENSE
60 Copyright 2009 Infinity Interactive
62 This program is free software; you can redistribute it and/or modify it
63 under the same terms as Perl itself.