package Maypole::Model::CDBI::FromCGI;
use strict;
+use warnings;
=head1 NAME
=cut
-use warnings;
# The base base model class for apps
# provides good search and create functions
unless ref $self;
my ($errors, $validated, @created);
-
my $params = $opts->{params} || $r->params;
$opts->{params} = $self->classify_form_inputs($params);
($validated, $errors) = $self->validate_all($r, $opts);
# Required field error
if ($required{$field} and !ref($value) and $err =~ /^No input for/) {
- #($value eq '' or !defined $value))
$errors->{$field} = "You must supply '$field'"
- #unless ($updating and$self->field;
} elsif ($err) {
# 1: No inupt entered