@@ -, +, @@ --- Koha/Acquisition/Basket.pm | 8 ++++++++ 1 file changed, 8 insertions(+) --- a/Koha/Acquisition/Basket.pm +++ a/Koha/Acquisition/Basket.pm @@ -92,6 +92,14 @@ sub orders { return wantarray ? $self->{_orders}->as_list : $self->{_orders}; } +=head3 total + +Returns basket's total cost + + my $total = $basket->total; + +=cut + sub total { my ($self) = @_; --