Schreibfehler im englischen String

[mfinanz.git] / SL / DB / DeliveryOrderItem.pm

diff --git a/SL/DB/DeliveryOrderItem.pm b/SL/DB/DeliveryOrderItem.pm
index fbab5ef05320ec7195dc8e6c0bcc378ee1fce5ee..433e676b0aa472af50fca8791876c859d0dca323 100644 (file)
--- a/SL/DB/DeliveryOrderItem.pm
+++ b/SL/DB/DeliveryOrderItem.pm
@@ -4,7 +4,7 @@ use strict;
 
 use SL::DB::MetaSetup::DeliveryOrderItem;
 use SL::DB::Helper::CustomVariables (
-  sub_module  => 'orderitems',
+  sub_module  => 'delivery_order_item',
   cvars_alias => 1,
   overloads   => {
     parts_id => 'SL::DB::Part',
@@ -12,12 +12,21 @@ use SL::DB::Helper::CustomVariables (
 );
 
 __PACKAGE__->meta->make_manager_class;
+__PACKAGE__->meta->add_relationship(
+  unit_obj       => {
+    type         => 'many to one',
+    class        => 'SL::DB::Unit',
+    column_map   => { unit => 'name' },
+  },
+);
+
+__PACKAGE__->meta->initialize;
 
 # methods
 
 sub part {
   # canonial alias for parts.
-  return shift->parts;
+  goto &parts;
 }
 
 1;