Parent Directory | Revision Log | Patch
revision 714 by dpavlin, Wed Dec 3 22:23:26 2008 UTC | revision 715 by dpavlin, Thu Dec 4 17:33:39 2008 UTC | |
---|---|---|
# | Line 128 sub params_form { | Line 128 sub params_form { |
128 | grep { | grep { |
129 | ! $class->meta->get_attribute($_)->is_lazy | ! $class->meta->get_attribute($_)->is_lazy |
130 | && ! defined $default->{$_} | && ! defined $default->{$_} |
131 | && ! m{^_} # skip _private | |
132 | } $self->attributes | } $self->attributes |
133 | ) { | ) { |
134 | my $attr_type = ''; | my $attr_type = ''; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |