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

events.pm: remove undefined warnings

Browse Source
This commit is contained in:
Milan
2020-10-17 21:45:48 +02:00
parent 215f425cda
commit c12d15865f
1 changed files with 12 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
lib/calcms/events.pm
View File

@@ -189,11 +189,11 @@ sub modify_results ($$$$) {
if ( ( $result->{series_name} ne '' ) if ( ( $result->{series_name} ne '' )
|| ( $result->{title} ne '' ) ); || ( $result->{title} ne '' ) );
} }
if ( $result->{series_name} ne '' ) { if ( ($result->{series_name}//'') ne '' ) {
$result->{event_uri} .= $result->{series_name}; $result->{event_uri} .= $result->{series_name};
$result->{event_uri} .= '-' if ( $result->{title} ne '' ); $result->{event_uri} .= '-' if ( $result->{title} ne '' );
} }
$result->{event_uri} .= $result->{title} if $result->{title} ne ''; $result->{event_uri} .= $result->{title} if length $result->{title};
$result->{event_uri} =~ s/\#/Nr./g; $result->{event_uri} =~ s/\#/Nr./g;
$result->{event_uri} =~ s/\&/und/g; $result->{event_uri} =~ s/\&/und/g;
$result->{event_uri} =~ s/\//\%2f/g; $result->{event_uri} =~ s/\//\%2f/g;
@@ -212,10 +212,15 @@ sub modify_results ($$$$) {
$result->{source_base_url} = $config->{locations}->{source_base_url}; $result->{source_base_url} = $config->{locations}->{source_base_url};
$result->{cache_base_url} = $config->{cache}->{base_url}; $result->{cache_base_url} = $config->{cache}->{base_url};
$result->{is_running} = 1 $result->{is_running} = 1 if
if ( $running_event_id eq $result->{event_id} ); $running_event_id
$result->{one_comment} = 1 if ( $result->{comment_count} == 1 ); && $result->{event_id}
$result->{no_comment} = 1 if ( $result->{comment_count} == 0 ); && $running_event_id eq $result->{event_id} ;
if (defined $result->{comment_count}){
$result->{one_comment} = 1 if ( $result->{comment_count} == 1 );
$result->{no_comment} = 1 if ( $result->{comment_count} == 0 );
}
#fix image url #fix image url
#$params->{exclude_event_images}=0 unless defined $params->{exclude_event_images}; #$params->{exclude_event_images}=0 unless defined $params->{exclude_event_images};
@@ -262,7 +267,7 @@ sub modify_results ($$$$) {
$result->{ 'project_' . $key } = $project->{$key}; $result->{ 'project_' . $key } = $project->{$key};
} }
} else { } else {
print STDERR "events::get - unknown project for event $result->{id}\n"; printf STDERR "events::get - unknown project for event %s\n", $result->{id} // "undef";
} }
#if project_id is set add columns from project (cached) #if project_id is set add columns from project (cached)