From 9b392ae0f4b2ee3bc755db1da7f191f7504a465a Mon Sep 17 00:00:00 2001
From: Milan <mc@radiopiloten.de>
Date: Sat, 29 Feb 2020 22:01:41 +0100
Subject: [PATCH] update series image on saving event

series images are assigned to events on saving series.  This change does
also update event image with series image on saving the image.
---
 website/agenda/planung/event.cgi | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/website/agenda/planung/event.cgi b/website/agenda/planung/event.cgi
index d560e13..a394312 100755
--- a/website/agenda/planung/event.cgi
+++ b/website/agenda/planung/event.cgi
@@ -615,8 +615,20 @@ sub save_event {
         return;
     }
 
-    $entry->{image}        = images::normalizeName( $entry->{image} );
-    $entry->{series_image} = images::normalizeName( $entry->{series_image} );
+    my $series = series::get($config,
+        {
+            project_id => $params->{project_id},
+            studio_id  => $params->{studio_id},
+            series_id  => $params->{series_id},
+        }
+    );
+    my $serie = $series->[0];
+    unless ( defined $serie ) {
+        uac::print_error("series not found");
+        return;
+    }
+    $entry->{image}        = images::normalizeName( $serie->{image} );
+    $entry->{series_image} = images::normalizeName( $serie->{series_image} );
 
     #print STDERR "event to update2: ".Dumper($entry);