From 4ac74078e265ea321464c4cbd446a55c373c936a Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Wed, 12 Jan 2011 15:53:34 +0100 Subject: [PATCH] =?utf8?q?Sub-Aliase=20'items'=20auf=20'orderitems'=20bzw.?= =?utf8?q?=20'invoiceitems'=20zur=20sp=C3=A4teren=20Verwendung=20eines=20M?= =?utf8?q?ixins?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Conflicts: SL/DB/DeliveryOrder.pm SL/DB/PurchaseInvoice.pm --- SL/DB/DeliveryOrder.pm | 2 ++ SL/DB/Invoice.pm | 2 ++ SL/DB/Order.pm | 2 ++ SL/DB/PurchaseInvoice.pm | 2 ++ 4 files changed, 8 insertions(+) diff --git a/SL/DB/DeliveryOrder.pm b/SL/DB/DeliveryOrder.pm index b5bdcb413..15d849aab 100644 --- a/SL/DB/DeliveryOrder.pm +++ b/SL/DB/DeliveryOrder.pm @@ -19,6 +19,8 @@ __PACKAGE__->meta->initialize; # methods +sub items { goto &orderitems; } + sub sales_order { my $self = shift; my %params = @_; diff --git a/SL/DB/Invoice.pm b/SL/DB/Invoice.pm index 993920c01..cb366727e 100644 --- a/SL/DB/Invoice.pm +++ b/SL/DB/Invoice.pm @@ -25,6 +25,8 @@ __PACKAGE__->meta->initialize; # methods +sub items { goto &invoiceitems; } + # it is assumed, that ordnumbers are unique here. sub first_order_by_ordnumber { my $self = shift; diff --git a/SL/DB/Order.pm b/SL/DB/Order.pm index 8d321661d..864da21ef 100644 --- a/SL/DB/Order.pm +++ b/SL/DB/Order.pm @@ -34,6 +34,8 @@ __PACKAGE__->meta->initialize; # methods +sub items { goto &orderitems; } + sub type { my $self = shift; diff --git a/SL/DB/PurchaseInvoice.pm b/SL/DB/PurchaseInvoice.pm index a06a3b639..b73066e20 100644 --- a/SL/DB/PurchaseInvoice.pm +++ b/SL/DB/PurchaseInvoice.pm @@ -14,4 +14,6 @@ __PACKAGE__->meta->add_relationship(invoiceitems => { type => 'one to ma __PACKAGE__->meta->initialize; +sub items { goto &invoiceitems; } + 1; -- 2.20.1