diff options
Diffstat (limited to 'lib/RHRD/rddb.pm')
| -rwxr-xr-x | lib/RHRD/rddb.pm | 6 |
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(); |