diff --git a/installer/data/mysql/atomicupdate/bug_33363.pl b/installer/data/mysql/atomicupdate/bug_33363.pl index 6f06c336b4..aef8f3a75c 100755 --- a/installer/data/mysql/atomicupdate/bug_33363.pl +++ b/installer/data/mysql/atomicupdate/bug_33363.pl @@ -1,4 +1,5 @@ use Modern::Perl; +use Koha::Installer::Output qw(say_warning say_failure say_success say_info); return { bug_number => "33363", @@ -10,16 +11,17 @@ return { $dbh->do( q{INSERT IGNORE INTO permissions (module_bit, code, description) VALUES (12, 'suggestions_create', 'Create purchase suggestions')} - ); + ) && say_success($out, "Added new permissions suggestions_create"); $dbh->do( q{INSERT IGNORE INTO permissions (module_bit, code, description) VALUES (12, 'suggestions_delete', 'Update purchase suggestions')} - ); + ) && say_success($out, "Added new permissions suggestions_delete"); $dbh->do( q{INSERT IGNORE INTO user_permissions (borrowernumber, module_bit, code) SELECT borrowernumber, 12, 'suggestions_create' FROM borrowers WHERE flags & (1 << 2)} - ); + ) && say_success($out, "Added new permissions suggestions_create to patrons with suggestions_manage"); $dbh->do( q{INSERT IGNORE INTO user_permissions (borrowernumber, module_bit, code) SELECT borrowernumber, 12, 'suggestions_delete' FROM borrowers WHERE flags & (1 << 2)} - ); + ) && say_success($out, "Added new permissions suggestions_delete to patrons with suggestions_manage"); + }, };