/[Frey]/trunk/lib/Frey/Action.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/Action.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1113 by dpavlin, Mon Jun 29 18:25:33 2009 UTC revision 1133 by dpavlin, Tue Jun 30 15:10:55 2009 UTC
# Line 1  Line 1 
1  package Frey::Action;  package Frey::Action;
2  use Moose;  use Moose;
3  extends 'Frey::PPI';  extends 'Frey::PPI';
4  with 'Frey::Web';  with 'Frey::Web', 'Frey::Config';
 with 'Frey::Config';  
5    
6  use Clone qw/clone/;  use Clone qw/clone/;
7  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
# Line 275  sub params_form { Line 274  sub params_form {
274                          push @checkboxes, $name;                          push @checkboxes, $name;
275                  } elsif ( ! defined $value && ! $required->{$name} ) {                  } elsif ( ! defined $value && ! $required->{$name} ) {
276                          $value_html = qq|<tt id="$name">undef</tt><!-- $name = undef -->|; # FIXME if $self->debug                          $value_html = qq|<tt id="$name">undef</tt><!-- $name = undef -->|; # FIXME if $self->debug
277                  } elsif ( $attr_type !~ m{^(Str|Int)$} || $value =~ $Frey::Web::re_html || $name =~ m{text} ) {                  } elsif ( $attr_type !~ m{^(Str|Int|Email)$} || $value =~ $Frey::Web::re_html || $name =~ m{text} ) {
278                          $value_html = qq|<textarea name="$name" title="$attr_type">$value</textarea>|;                          $value_html = qq|<textarea name="$name" title="$attr_type">$value</textarea>|;
279                  }                  }
280    
# Line 392  L<http://www.quirksmode.org/css/forms.ht Line 391  L<http://www.quirksmode.org/css/forms.ht
391    
392  =cut  =cut
393    
394    __PACKAGE__->meta->make_immutable;
395    no Moose;
396    
397  1;  1;
Legend:
Removed from v.1113  
changed lines
  Added in v.1133
  ViewVC Help
Powered by ViewVC 1.1.26