X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAM.pm;h=2ec225238a2ca63ab14fd156e73b4cb5846c15ae;hb=b775c378552e6b5bf59f98046cdf4e577cd351df;hp=57e6b445abf44c388e3bc682401b98401f929dc8;hpb=5202b3e71b817c6a78845cd4c27773760ff408b6;p=kivitendo-erp.git

diff --git a/SL/AM.pm b/SL/AM.pm
index 57e6b445a..2ec225238 100644
--- a/SL/AM.pm
+++ b/SL/AM.pm
@@ -556,7 +556,7 @@ sub save_preferences {
 
   my ($self, $form) = @_;
 
-  my $employee = SL::DB::Manager::Employee->find_by(login => $::myconfig{login});
+  my $employee = SL::DB::Manager::Employee->current;
   $employee->update_attributes(name => $form->{name});
 
   my $user = SL::DB::Manager::AuthUser->find_by(login => $::myconfig{login});
@@ -1249,6 +1249,8 @@ sub save_warehouse {
 
   my ($self, $myconfig, $form) = @_;
 
+  croak('Need at least one new bin') unless $form->{number_of_new_bins} > 0;
+
   SL::DB->client->with_transaction(sub {
     my $dbh = SL::DB->client->dbh;