X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/3b249feb1cf3b3dd91dfa3038ef8f694db251988..d91dbc1f9799e5ebfb2a5746a99ba5cc842d6617:/SL/DB/Assembly.pm diff --git a/SL/DB/Assembly.pm b/SL/DB/Assembly.pm index a77e34b54..2519c1a45 100644 --- a/SL/DB/Assembly.pm +++ b/SL/DB/Assembly.pm @@ -12,7 +12,7 @@ __PACKAGE__->meta->make_manager_class; __PACKAGE__->meta->initialize; -sub linetotal { +sub linetotal_sellprice { my ($self) = @_; return 0 unless $self->qty > 0 and $self->part->sellprice > 0;