From: Sven Schöling <s.schoeling@linet-services.de>
Date: Thu, 20 Jun 2013 16:53:36 +0000 (+0200)
Subject: In Helper kein use SL::DB::Objects
X-Git-Tag: release-3.1.0beta1~285
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=a34ae1630d888a6c824dad13db000bd7e0e1c3e6;p=kivitendo-erp.git

In Helper kein use SL::DB::Objects
---

diff --git a/SL/DB/Helper/PriceTaxCalculator.pm b/SL/DB/Helper/PriceTaxCalculator.pm
index 73613f89d..e4a91807b 100644
--- a/SL/DB/Helper/PriceTaxCalculator.pm
+++ b/SL/DB/Helper/PriceTaxCalculator.pm
@@ -7,13 +7,13 @@ our @EXPORT = qw(calculate_prices_and_taxes);
 
 use Carp;
 use List::Util qw(sum min);
-use SL::DB::Default;
-use SL::DB::PriceFactor;
-use SL::DB::Unit;
 
 sub calculate_prices_and_taxes {
   my ($self, %params) = @_;
 
+  require SL::DB::PriceFactor;
+  require SL::DB::Unit;
+
   my %units_by_name       = map { ( $_->name => $_ ) } @{ SL::DB::Manager::Unit->get_all        };
   my %price_factors_by_id = map { ( $_->id   => $_ ) } @{ SL::DB::Manager::PriceFactor->get_all };
 
@@ -52,6 +52,7 @@ sub calculate_prices_and_taxes {
 
 sub _get_exchangerate {
   my ($self, $data, %params) = @_;
+  require SL::DB::Default;
 
   my $currency = $self->currency_id ? $self->currency->name || '' : '';
   if ($currency ne SL::DB::Default->get_default_currency) {