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

(-)a/Koha/Account/Line.pm (-1 / +11 lines)
Lines 37-44 Koha::Account::Line - Koha accountline Object class Link Here
37
37
38
=head2 Class methods
38
=head2 Class methods
39
39
40
=head3 new
41
42
Creates and returns new object, when there is no branchcode param, it is set to active userenv branchcode
43
40
=cut
44
=cut
41
45
46
sub new {
47
    my ($class, $params) = @_;
48
    $params->{ branchcode } //=
49
        defined C4::Context->userenv ? C4::Context->userenv->{branch} : undef;
50
    return $class->SUPER::new($params);
51
}
52
42
=head3 item
53
=head3 item
43
54
44
Return the item linked to this account line if exists
55
Return the item linked to this account line if exists
45
- 

Return to bug 21401