/[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 1162 by dpavlin, Thu Jul 2 17:49:04 2009 UTC revision 1171 by dpavlin, Sun Jul 5 21:25:25 2009 UTC
# Line 382  sub params_form { Line 382  sub params_form {
382                          |;                          |;
383                  }                  }
384    
385                    my $submit = $self->_label( 'submit' );
386                    $submit =~ s{^submit$}{Run $class};
387    
388                  $html .= qq|                  $html .= qq|
389                          <form name="$form_id" id="$form_id" method="post">                          <form name="$form_id" id="$form_id" method="post">
390                          $form                          $form
391                          <input type="submit" value="Run $class">                          <input type="submit" value="$submit">
392                          </form>                          </form>
393                  |;                  |;
394                  $html .= $self->class->form_footer if $self->class->can('form_footer');                  $html .= $self->class->form_footer if $self->class->can('form_footer');
# Line 399  sub params_form { Line 402  sub params_form {
402                  },                  },
403          });          });
404    
405            $self->title( $self->class->title ) if $self->class->title;
406    
407          return ($html,$default) if wantarray;          return ($html,$default) if wantarray;
408          return $html;          return $html;
409  }  }
Legend:
Removed from v.1162  
changed lines
  Added in v.1171
  ViewVC Help
Powered by ViewVC 1.1.26