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'); |