X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FPE.pm;h=5a23fb749c9254b2a5a6f118804a862e206d18c0;hb=48de433a81ca9a8cef8e082daae0315bb015a748;hp=57c9c67afa6c731a077739571ec29276d68cc463;hpb=58b14f96d6a7aab3bad2ffac3f8930793cf15a09;p=kivitendo-erp.git diff --git a/SL/PE.pm b/SL/PE.pm index 57c9c67af..5a23fb749 100644 --- a/SL/PE.pm +++ b/SL/PE.pm @@ -136,7 +136,7 @@ sub save_project { # connect to database my $dbh = $form->dbconnect($myconfig); - map { $form->{$_} =~ s/\'/\'\'/g } (projectnumber, description); + map { $form->{$_} =~ s/\'/\'\'/g } qw(projectnumber description); if ($form->{id}) { $query = qq|UPDATE project SET @@ -218,8 +218,7 @@ sub save_partsgroup { # connect to database my $dbh = $form->dbconnect($myconfig); - map { $form->{$_} =~ s/\'/\'\'/g } (partsgroup); - + map { $form->{$_} =~ s/\'/\'\'/g } qw(partsgroup); $form->{discount} /= 100; if ($form->{id}) { @@ -360,7 +359,7 @@ sub save_pricegroup { # connect to database my $dbh = $form->dbconnect($myconfig); - map { $form->{$_} =~ s/\'/\'\'/g } (pricegroup); + map { $form->{$_} =~ s/\'/\'\'/g } qw(pricegroup); $form->{discount} /= 100;