From e6ef45f2d8a980a68bd54df8c2afce4e0203c289 Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Tue, 29 May 2007 11:18:06 +0000
Subject: [PATCH] =?utf8?q?Beim=20Speichern=20von=20Angeboten=20etc=20den?=
 =?utf8?q?=20Bearbeiter=20nicht=20aus=20$form->{employee}=20ableiten,=20we?=
 =?utf8?q?il=20die=20Drop-Down-Box=20jetzt=20$form->{employee=5Fid}=20hei?=
 =?utf8?q?=C3=9Ft.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 SL/OE.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SL/OE.pm b/SL/OE.pm
index 3800e334a..d30231160 100644
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -187,7 +187,7 @@ sub save {
   my $all_units = AM->retrieve_units($myconfig, $form);
   $form->{all_units} = $all_units;
 
-  ($null, $form->{employee_id}) = split /--/, $form->{employee};
+  $form->{employee_id} = (split /--/, $form->{employee})[1] if !$form->{employee_id};
   unless ($form->{employee_id}) {
     $form->get_employee($dbh);
   }
-- 
2.20.1