5.60
- Fixed restarter.
+ - Added a warning if you attempt to retrieve a parameter
+ using $c->req->params('foo').
5.59 2005-11-30 13:25:00
- Fixed shebang line for generated scripts
sub parameters {
my ( $self, $params ) = @_;
$self->{_context}->prepare_body;
- $self->{parameters} = $params if $params;
+ if ( $params ) {
+ if ( ref $params ) {
+ $self->{parameters} = $params;
+ }
+ else {
+ $self->{_context}->log->warn(
+ "Attempt to retrieve '$params' with req->params(), " .
+ "you probably meant to call req->param('$params')" );
+ }
+ }
return $self->{parameters};
}