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

(-)a/Koha/Illrequest.pm (-2 / +2 lines)
Lines 1555-1561 sub get_notice { Link Here
1555
    );
1555
    );
1556
    my $metahash = $self->metadata;
1556
    my $metahash = $self->metadata;
1557
    my @metaarray = ();
1557
    my @metaarray = ();
1558
    while (my($key, $value) = each %{$metahash}) {
1558
    foreach my $key (sort { lc $a cmp lc $b } keys %{$metahash}) {
1559
        my $value = $metahash->{$key};
1559
        push @metaarray, "- $key: $value" if $value;
1560
        push @metaarray, "- $key: $value" if $value;
1560
    }
1561
    }
1561
    my $metastring = join("\n", @metaarray);
1562
    my $metastring = join("\n", @metaarray);
1562
- 

Return to bug 28340