POD-Fehler fixen

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

diff --git a/SL/DB/Order.pm b/SL/DB/Order.pm
index 097d471f3c9f7afaadf65722fb2e088145def9b6..7d5e2fe4aaacf7f350d77f17791507717d7d56a8 100644 (file)
--- a/SL/DB/Order.pm
+++ b/SL/DB/Order.pm
@@ -168,7 +168,8 @@ sub convert_to_delivery_order {
       foreach (qw(orderitems)) {    # expand if needed (delivery_order_items)
         if ($item->{"converted_from_${_}_id"}) {
           die unless $item->{id};
-          RecordLinks->create_links('mode'       => 'ids',
+          RecordLinks->create_links('dbh'        => $self->db->dbh,
+                                    'mode'       => 'ids',
                                     'from_table' => $_,
                                     'from_ids'   => $item->{"converted_from_${_}_id"},
                                     'to_table'   => 'delivery_order_items',
@@ -223,6 +224,10 @@ sub digest {
 
 __END__
 
+=pod
+
+=encoding utf8
+
 =head1 NAME
 
 SL::DB::Order - Order Datenbank Objekt.