X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAM.pm;h=2d8ed4cff168c52942304db708cd37b65c80a599;hb=ff159a4d47b9a2d10744dcfc23da2c63605c8a32;hp=b7c60033b9c7a8280c238e4757d147e958591371;hpb=9a14696176033f03c97244f420d93f9c15efed61;p=kivitendo-erp.git diff --git a/SL/AM.pm b/SL/AM.pm index b7c60033b..2d8ed4cff 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -52,8 +52,10 @@ use SL::DB::Part; use SL::DB::Vendor; use SL::DB; use SL::GenericTranslations; +use SL::Helper::UserPreferences::DisplayPreferences; use SL::Helper::UserPreferences::PositionsScrollbar; use SL::Helper::UserPreferences::PartPickerSearch; +use SL::Helper::UserPreferences::TimeRecording; use SL::Helper::UserPreferences::UpdatePositions; use strict; @@ -546,12 +548,20 @@ sub positions_show_update_button { SL::Helper::UserPreferences::UpdatePositions->new()->get_show_update_button(); } +sub time_recording_use_duration { + SL::Helper::UserPreferences::TimeRecording->new()->get_use_duration(); +} + +sub longdescription_dialog_size_percentage { + SL::Helper::UserPreferences::DisplayPreferences->new()->get_longdescription_dialog_size_percentage(); +} + sub save_preferences { $main::lxdebug->enter_sub(); 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}); @@ -583,6 +593,12 @@ sub save_preferences { if (exists $form->{positions_show_update_button}) { SL::Helper::UserPreferences::UpdatePositions->new()->store_show_update_button($form->{positions_show_update_button}) } + if (exists $form->{time_recording_use_duration}) { + SL::Helper::UserPreferences::TimeRecording->new()->store_use_duration($form->{time_recording_use_duration}) + } + if (exists $form->{longdescription_dialog_size_percentage}) { + SL::Helper::UserPreferences::DisplayPreferences->new()->store_longdescription_dialog_size_percentage($form->{longdescription_dialog_size_percentage}) + } $main::lxdebug->leave_sub(); @@ -1241,6 +1257,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;