harmonized input output values for mulit-show lib functions

1 files changed, 4 insertions, 2 deletions

diff --git a/lib/RHRD/rddb.pm b/lib/RHRD/rddb.pm
index d4ff7a5..5e0afbc 100755
--- a/lib/RHRD/rddb.pm
+++ b/lib/RHRD/rddb.pm
@@ -2036,7 +2036,9 @@ sub create_multi_show
 {
   my $ctx = shift;
   my $title = shift;
-  my $shows = join(";", @_);
+  my %shows = %{shift()};
+
+  my $showstr = join(";", map { "$_:$shows{$_}" } sort keys %shows);
 
   my ($number, $status, $errorstring) = get_next_free_multi_showid($ctx);
   unless (defined $number) {
@@ -2048,7 +2050,7 @@ sub create_multi_show
   my $sth = $ctx->{'dbh'}->prepare($sql)
     or return (undef, 'ERROR', "Database Error: " . $ctx->{'dbh'}->errstr);
 
-  $sth->execute($number, $ctx->{'config'}{'specialgroups'}{'multishows'}, $title, $shows)
+  $sth->execute($number, $ctx->{'config'}{'specialgroups'}{'multishows'}, $title, $showstr)
     or return (undef, 'ERROR', "Database Error: " . $sth->errstr);
 
   $sth->finish();