83 |
my $class = $self->class; |
my $class = $self->class; |
84 |
$self->load_class( $class ); |
$self->load_class( $class ); |
85 |
|
|
86 |
|
$self->add_usage( $class ); |
87 |
|
|
88 |
if ( my $form = $self->params_form ) { |
if ( my $form = $self->params_form ) { |
89 |
$html = $self->html_page( body => $form ); |
$html = $self->html_page( body => $form ); |
90 |
warn "missing required params form for $class ", $self->run, " format: ", $self->format; |
warn "missing required params form for $class ", $self->run, " format: ", $self->format; |
91 |
} else { |
} else { |
92 |
|
|
|
$self->usage->{ $class }++; |
|
|
|
|
93 |
=begin remove |
=begin remove |
94 |
|
|
95 |
my $o; |
my $o; |