@@ -, +, @@ --- installer/data/mysql/atomicupdate/bug_30335.pl | 16 +++++++++++++--- 1 file changed, 13 insertions(+), 3 deletions(-) --- a/installer/data/mysql/atomicupdate/bug_30335.pl +++ a/installer/data/mysql/atomicupdate/bug_30335.pl @@ -1,15 +1,25 @@ use Modern::Perl; return { - bug_number => "30335", + bug_number => "30335", description => "Add manual_invoice and manual_credit permissions", - up => sub { + up => sub { my ($args) = @_; - my ($dbh, $out) = @$args{qw(dbh out)}; + my ( $dbh, $out ) = @$args{qw(dbh out)}; $dbh->do(q{ INSERT IGNORE permissions (module_bit, code, description) VALUES (10, 'manual_credit', 'Add manual credits to a patron account'), (10, 'manual_invoice', 'Add manual invoices to a patron account') }); + + $dbh->do(q{ + INSERT IGNORE INTO user_permissions (borrowernumber, module_bit, code) + SELECT borrowernumber, 10, 'manual_credit' FROM user_permissions WHERE code = 'remaining_permissions' + }); + + $dbh->do(q{ + INSERT IGNORE INTO user_permissions (borrowernumber, module_bit, code) + SELECT borrowernumber, 10, 'manual_invoice' FROM user_permissions WHERE code = 'remaining_permissions' + }); }, }; --