# - #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 = "21.12.00.035";
+$VERSION = "21.12.00.036";
sub version {
return $VERSION;
+++ /dev/null
-use Modern::Perl;
-
-return {
- bug_number => 28786,
- description => "Add syspref TwoFactorAuthentication, fields secret and auth_method",
- up => sub {
- my ($args) = @_;
- my ($dbh, $out) = @$args{qw(dbh out)};
-
- $dbh->do(q{
- INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES
- ('TwoFactorAuthentication', '0', 'NULL', 'Enables two-factor authentication', 'YesNo')
- });
-
- if( !column_exists( 'borrowers', 'secret' ) ) {
- $dbh->do(q{
- ALTER TABLE borrowers ADD COLUMN `secret` MEDIUMTEXT COLLATE utf8mb4_unicode_ci DEFAULT NULL COMMENT 'Secret for 2FA' AFTER `password`
- });
- }
-
- if( !column_exists( 'deletedborrowers', 'secret' ) ) {
- $dbh->do(q{
- ALTER TABLE deletedborrowers ADD COLUMN `secret` MEDIUMTEXT COLLATE utf8mb4_unicode_ci DEFAULT NULL COMMENT 'Secret for 2FA' AFTER `password`
- });
- }
-
- if( !column_exists( 'borrowers', 'auth_method' ) ) {
- $dbh->do(q{
- ALTER TABLE borrowers ADD COLUMN `auth_method` ENUM('password', 'two-factor') NOT NULL DEFAULT 'password' COMMENT 'Authentication method' AFTER `secret`
- });
- }
-
- if( !column_exists( 'deletedborrowers', 'auth_method' ) ) {
- $dbh->do(q{
- ALTER TABLE deletedborrowers ADD COLUMN `auth_method` ENUM('password', 'two-factor') NOT NULL DEFAULT 'password' COMMENT 'Authentication method' AFTER `secret`
- });
- }
- },
-};
--- /dev/null
+use Modern::Perl;
+
+return {
+ bug_number => 28786,
+ description => "Add syspref TwoFactorAuthentication, fields secret and auth_method",
+ up => sub {
+ my ($args) = @_;
+ my ($dbh, $out) = @$args{qw(dbh out)};
+
+ $dbh->do(q{
+ INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES
+ ('TwoFactorAuthentication', '0', 'NULL', 'Enables two-factor authentication', 'YesNo')
+ });
+
+ if( !column_exists( 'borrowers', 'secret' ) ) {
+ $dbh->do(q{
+ ALTER TABLE borrowers ADD COLUMN `secret` MEDIUMTEXT COLLATE utf8mb4_unicode_ci DEFAULT NULL COMMENT 'Secret for 2FA' AFTER `password`
+ });
+ }
+
+ if( !column_exists( 'deletedborrowers', 'secret' ) ) {
+ $dbh->do(q{
+ ALTER TABLE deletedborrowers ADD COLUMN `secret` MEDIUMTEXT COLLATE utf8mb4_unicode_ci DEFAULT NULL COMMENT 'Secret for 2FA' AFTER `password`
+ });
+ }
+
+ if( !column_exists( 'borrowers', 'auth_method' ) ) {
+ $dbh->do(q{
+ ALTER TABLE borrowers ADD COLUMN `auth_method` ENUM('password', 'two-factor') NOT NULL DEFAULT 'password' COMMENT 'Authentication method' AFTER `secret`
+ });
+ }
+
+ if( !column_exists( 'deletedborrowers', 'auth_method' ) ) {
+ $dbh->do(q{
+ ALTER TABLE deletedborrowers ADD COLUMN `auth_method` ENUM('password', 'two-factor') NOT NULL DEFAULT 'password' COMMENT 'Authentication method' AFTER `secret`
+ });
+ }
+ },
+};