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

Bug 24379: DBRev 20.05.02.001 

Signed-off-by: Lucas Gass <lucas@bywatersolutions.com>
This commit is contained in:
Lucas Gass 2020-07-24 21:55:44 +00:00
parent 6d675b61ad
commit ac5fbb0f51
3 changed files with 10 additions and 9 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 = "20.05.02.000";
$VERSION = "20.05.02.001";
sub version {
return $VERSION;

8
installer/data/mysql/atomicupdate/make_login_attempts_not_nullable.perl
View File

@ -1,8 +0,0 @@
if( CheckVersion( $DBversion ) ) {
$dbh->do( "UPDATE borrowers SET login_attempts=0 WHERE login_attempts IS NULL" );
$dbh->do( "ALTER TABLE borrowers MODIFY COLUMN login_attempts int(4) NOT NULL DEFAULT 0" );
$dbh->do( "UPDATE deletedborrowers SET login_attempts=0 WHERE login_attempts IS NULL" );
$dbh->do( "ALTER TABLE deletedborrowers MODIFY COLUMN login_attempts int(4) NOT NULL DEFAULT 0" );
SetVersion( $DBversion );
print "Upgrade to $DBversion done (Bug XXXXX - Set login_attempts NOT NULL)\n";
}

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

@ -22225,6 +22225,15 @@ if( CheckVersion( $DBversion ) ) {
NewVersion( $DBversion, undef, '20.05.02 release' );
}
$DBversion = '20.05.02.001';
if( CheckVersion( $DBversion ) ) {
$dbh->do( "UPDATE borrowers SET login_attempts=0 WHERE login_attempts IS NULL" );
$dbh->do( "ALTER TABLE borrowers MODIFY COLUMN login_attempts int(4) NOT NULL DEFAULT 0" );
$dbh->do( "UPDATE deletedborrowers SET login_attempts=0 WHERE login_attempts IS NULL" );
$dbh->do( "ALTER TABLE deletedborrowers MODIFY COLUMN login_attempts int(4) NOT NULL DEFAULT 0" );
NewVersion( $DBversion, 24379, "Set login_attempts NOT NULL" );
}
# SEE bug 13068
# if there is anything in the atomicupdate, read and execute it.
my $update_dir = C4::Context->config('intranetdir') . '/installer/data/mysql/atomicupdate/';