1 # @tag: sales_letter_rights
2 # @description: Setzt das neue Recht die Brieffunktion anzuzeigen
3 # @depends: release_3_2_0 add_master_rights
4 package SL::DBUpgrade2::Auth::sales_letter_rights;
9 use parent qw(SL::DBUpgrade2::Base);
16 my $groups = $main::auth->read_groups();
18 foreach my $group (values %{$groups}) {
19 $group->{rights}->{sales_letter_edit} = $group->{rights}->{sales_order_edit};
20 $group->{rights}->{sales_letter_report} = $group->{rights}->{sales_order_edit};
21 $main::auth->save_group($group);