gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 22868: DBRev 19.05.07.005 

Signed-off-by: Lucas Gass <lucas@bywatersolutions.com>
This commit is contained in:
Lucas Gass 2020-02-14 20:23:10 +00:00
parent f0c60dfe6f
commit bd8bdcaadc
3 changed files with 21 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Koha.pm
View File

@ -29,7 +29,7 @@ use vars qw{ $VERSION };
# - #4 : the developer version. The 4th number is the database subversion.
# used by developers when the database changes. updatedatabase take care of the changes itself
# and is automatically called by Auth.pm when needed.
$VERSION = "19.05.07.004";
$VERSION = "19.05.07.005";
sub version {
return $VERSION;

19
installer/data/mysql/atomicupdate/bug_22868.perl
View File

@ -1,19 +0,0 @@
$DBversion = 'XXX'; # will be replaced by the RM
if( CheckVersion( $DBversion ) ) {
$dbh->do(q{
INSERT IGNORE INTO `userflags` (`bit`, `flag`, `flagdesc`, `defaulton`)
VALUES (12, 'suggestions', 'Suggestion management', 0)
});
$dbh->do(q{
UPDATE permissions SET module_bit=12
WHERE code="suggestions_manage"
});
$dbh->do(q{
UPDATE borrowers SET flags = flags + (1<<12) WHERE flags & (1 << 11)
});
SetVersion( $DBversion );
print "Upgrade to $DBversion done (Bug 22868 - Move suggestions_manage subpermission out of acquisition permission)\n";
}

20
installer/data/mysql/updatedatabase.pl
View File

@ -18947,6 +18947,26 @@ if( CheckVersion( $DBversion ) ) {
print "Upgrade to $DBversion done (Bug 24289 - Adding foreign keys on *_holidays.branchcode tables)\n";
}
$DBversion = '19.05.07.005';
if( CheckVersion( $DBversion ) ) {
$dbh->do(q{
INSERT IGNORE INTO `userflags` (`bit`, `flag`, `flagdesc`, `defaulton`)
VALUES (12, 'suggestions', 'Suggestion management', 0)
});
$dbh->do(q{
UPDATE permissions SET module_bit=12
WHERE code="suggestions_manage"
});
$dbh->do(q{
UPDATE borrowers SET flags = flags + (1<<12) WHERE flags & (1 << 11)
});
SetVersion( $DBversion );
print "Upgrade to $DBversion done (Bug 22868 - Move suggestions_manage subpermission out of acquisition permission)\n";
}
# SEE bug 13068
# if there is anything in the atomicupdate, read and execute it.