kalipso/racalmas
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

set parameter strings with entry::set_strings

Browse Source
This commit is contained in:
Milan
2020-03-08 14:16:58 +01:00
parent 94d4ca59d8
commit 07219ad3ee
4 changed files with 19 additions and 65 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
website/agenda/planung/work-time.cgi
View File

@@ -299,20 +299,11 @@ sub check_params {
$checked->{create_events} = 0;
$checked->{publish_events} = 0;
}
for my $param ( 'frequency', 'duration', 'default_duration' ) {
if ( ( defined $params->{$param} ) && ( $params->{$param} =~ /(\d+)/ ) ) {
$checked->{$param} = $1;
}
}
entry::set_numbers( $checked, $params, [ 'frequency', 'duration', 'default_duration' ]);
#scalars
for my $param ( 'from', 'till', 'period_type', 'type', 'title' ) {
if ( defined $params->{$param} ) {
$checked->{$param} = $params->{$param};
$checked->{$param} =~ s/^\s+//g;
$checked->{$param} =~ s/\s+$//g;
}
}
entry::set_strings( $checked, $params,
[ 'from', 'till', 'period_type', 'type', 'title' ]
);
for my $attr ('start') {
if ( ( defined $params->{$attr} ) && ( $params->{$attr} =~ /(\d\d\d\d\-\d\d\-\d\d[ T]\d\d\:\d\d)/ ) ) {