Pear-Trading/Foodloop-Server
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Started on user day entry

Browse source
This commit is contained in:
Tom Bloor 2017-04-23 16:59:35 +01:00
parent b03b7ccc5f
commit 1598909958
6 changed files with 142 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/Pear/LocalLoop/Plugin/Validators.pm
View file

@ -5,6 +5,7 @@ use Email::Valid;
use Geo::UK::Postcode;
use Scalar::Util qw/ looks_like_number /;
use File::Basename;
use DateTime::Format::Strptime;
sub register {
my ( $plugin, $app, $conf ) = @_;
@ -45,6 +46,12 @@ sub register {
$extension =~ s/^\.//;
return $app->types->type($extension) eq $filetype ? undef : 1;
});
$app->validator->add_check( is_iso_datetime => sub {
my ( $validation, $name, $value ) = @_;
$value = $app->datetime_formatter->parse_datetime( $value );
return defined $value ? undef : 1;
});
}
1;