From 274da97c7c49d1b656bb2f6d2c29a9d5fba8bef4 Mon Sep 17 00:00:00 2001
From: Milan <mc@radiopiloten.de>
Date: Sat, 19 Dec 2020 21:44:45 +0100
Subject: [PATCH] events.pm: fix undef warnings

---
 lib/calcms/events.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/calcms/events.pm b/lib/calcms/events.pm
index 2d7b4f7..4c8165d 100644
--- a/lib/calcms/events.pm
+++ b/lib/calcms/events.pm
@@ -234,7 +234,7 @@ sub modify_results ($$$$) {
         if ( defined $result->{image} ) {
             my $url = $config->{locations}->{local_media_url} || '';
             my $image = $result->{image};
-            $result->{thumb_url} = $config->{locations}->{thumbs_url} . $image;
+            $result->{thumb_url} = $config->{locations}->{thumbs_url} . $image if $config->{locations}->{thumbs_url};
             $result->{icon_url}  = $url . '/icons/' . $image;
             $result->{image_url} = $url . '/images/' . $image;
         }
@@ -242,7 +242,7 @@ sub modify_results ($$$$) {
         if ( defined $result->{series_image} ) {
             my $url = $config->{locations}->{local_media_url} || '';
             my $image = $result->{series_image};
-            $result->{series_thumb_url} = $config->{locations}->{thumbs_url} . $image;
+            $result->{series_thumb_url} = $config->{locations}->{thumbs_url} . $image if $config->{locations}->{thumbs_url};
             $result->{series_icon_url}  = $url . '/icons/' . $image;
             $result->{series_image_url} = $url . '/images/' . $image;
         }
@@ -556,7 +556,7 @@ sub set_listen_key($$){
     return if $over_since > 7*24*60*60;
 
     my $archive_url = $config->{locations}->{listen_url};
-    if (defined $event->{listen_key}){
+    if (defined $event->{listen_url} and defined $event->{listen_key}){
         $event->{listen_url} = $archive_url . '/' . $event->{listen_key};
         return;
     }