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

(-)a/C4/ItemType.pm (-7 / +9 lines)
Lines 73-84 C<description>. Link Here
73
sub all {
73
sub all {
74
    my ($class) = @_;
74
    my ($class) = @_;
75
    my $dbh = C4::Context->dbh;
75
    my $dbh = C4::Context->dbh;
76
    return    map { $class->new($_) }    @{$dbh->selectall_arrayref(
76
77
        # The itemtypes table is small enough for
77
    my @itypes;
78
        # `SELECT *` to be harmless.
78
    for ( @{$dbh->selectall_arrayref(
79
        "SELECT * FROM itemtypes ORDER BY description",
79
        "SELECT * FROM itemtypes ORDER BY description", { Slice => {} })} )
80
        { Slice => {} },
80
    {
81
    )};
81
        utf8::encode($_->{description});
82
        push @itypes, $class->new($_);
83
    }
84
    return @itypes;
82
}
85
}
83
86
84
87
85
- 

Return to bug 6371