From dca6f3426cb6252dab71e625c541edea1375da5c Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Tue, 1 Jul 2014 09:59:52 +0200
Subject: [PATCH] =?utf8?q?Druckvorbereitung:=20Lieferschein-Model=20mit=20?=
 =?utf8?q?richtigem=20Prim=C3=A4rattribut=20laden?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Das ging im Commit »Einkauf/Verkauf: Lieferadressenfelder nie aus
Stammdaten vorbelegen« kaputt.
---
 SL/Form.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SL/Form.pm b/SL/Form.pm
index 7030454d6..4451440c1 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -3344,7 +3344,7 @@ sub prepare_for_printing {
 
   # Load shipping address from database if shipto_id is set.
   if ($self->{shipto_id}) {
-    my $shipto  = SL::DB::Shipto->new(id => $self->{shipto_id})->load;
+    my $shipto  = SL::DB::Shipto->new(shipto_id => $self->{shipto_id})->load;
     $self->{$_} = $shipto->$_ for grep { m{^shipto} } map { $_->name } @{ $shipto->meta->columns };
   }
 
-- 
2.20.1