View | Details | Raw Unified | Return to bug 32413
Collapse All | Expand All

(-)a/Koha/Report.pm (-1 / +6 lines)
Lines 152-157 sub prep_report { Link Here
152
    }
152
    }
153
153
154
    my %lookup;
154
    my %lookup;
155
    unless ( scalar @$param_names ) {
156
        my @placeholders = $sql =~ /<<([^<>]+)>>/g;
157
        foreach my $placeholder (@placeholders) {
158
            push @$param_names, $placeholder unless grep { $_ eq $placeholder } @$param_names;
159
        }
160
    }
155
    @lookup{@$param_names} = @$sql_params;
161
    @lookup{@$param_names} = @$sql_params;
156
    @split = split /<<|>>/, $sql;
162
    @split = split /<<|>>/, $sql;
157
    for ( my $i = 0 ; $i < $#split / 2 ; $i++ ) {
163
    for ( my $i = 0 ; $i < $#split / 2 ; $i++ ) {
158
- 

Return to bug 32413