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

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

Return to bug 28340