diff options
Diffstat (limited to 'lib/RHRD/rddb.pm')
| -rwxr-xr-x | lib/RHRD/rddb.pm | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/lib/RHRD/rddb.pm b/lib/RHRD/rddb.pm index 62f43bd..38abb1d 100755 --- a/lib/RHRD/rddb.pm +++ b/lib/RHRD/rddb.pm @@ -149,6 +149,12 @@ sub get_cart_range return ($low_cart, $high_cart, $chunk_size); } +sub get_showid_range +{ + my ($ctx) = @_; + return get_cart_range($ctx, $ctx->{'config'}{'specialgroups'}{'shows'}) +} + sub get_next_free_slot { my ($ctx, $groupname) = @_; @@ -1984,7 +1990,7 @@ sub list_multi_shows my $entry = {}; $entry->{'ID'} = $id; $entry->{'TITLE'} = $title; - $entry->{'SHOWS'} = @showlist; + $entry->{'SHOWS'} = \@showlist; push @mshows, $entry; } @@ -2024,7 +2030,7 @@ sub create_multi_show { my $ctx = shift; my $title = shift; - my $shows = join(@_, ";"); + my $shows = join(";", @_); my ($number, $status, $errorstring) = get_next_free_multi_showid($ctx); unless (defined $number) { |