Neue Part-Methoden für Erzeugnis- und Sortimentssummen

[mfinanz.git] / SL / Dev / CustomerVendor.pm

diff --git a/SL/Dev/CustomerVendor.pm b/SL/Dev/CustomerVendor.pm
index 3a8fa86005add023cc66428c2d2fd9271ce8741f..ef543709fa3206fb857f2ffebc13b703d81bc731 100644 (file)
--- a/SL/Dev/CustomerVendor.pm
+++ b/SL/Dev/CustomerVendor.pm
@@ -1,7 +1,8 @@
 package SL::Dev::CustomerVendor;
 
+use strict;
 use base qw(Exporter);
-@EXPORT = qw(create_customer);
+our @EXPORT = qw(create_customer);
 
 use SL::DB::TaxZone;
 use SL::DB::Currency;
@@ -51,6 +52,7 @@ Minimal usage, default values, without saving to database:
   my $customer = SL::Dev::CustomerVendor::create_customer();
 
 Complex usage, overwriting some defaults, and save to database:
+
   SL::Dev::CustomerVendor::create_customer(name        => 'Test customer',
                                            hourly_rate => 50,
                                            taxzone_id  => 2,
@@ -66,4 +68,3 @@ Nothing here yet.
 G. Richardson E<lt>grichardson@kivitendo-premium.deE<gt>
 
 =cut
-1;