From b5bcdaf2cb52902067e91590a3fce5a7d65bf5cb Mon Sep 17 00:00:00 2001
From: Andrew Fuerste-Henry <andrew@bywatersolutions.com>
Date: Fri, 4 Mar 2022 15:28:35 +0000
Subject: [PATCH] Bug 29596: DBRev 20.11.16.001

Signed-off-by: Andrew Fuerste-Henry <andrew@bywatersolutions.com>
(cherry picked from commit e6faadbc8647cbe667a38c47d265c6b6d301880d)
Signed-off-by: Victor Grousset/tuxayo <victor@tuxayo.net>
---
 Koha.pm                                       |  2 +-
 .../data/mysql/atomicupdate/bug_29596.pl      | 51 -------------------
 installer/data/mysql/updatedatabase.pl        | 44 ++++++++++++++++
 3 files changed, 45 insertions(+), 52 deletions(-)
 delete mode 100755 installer/data/mysql/atomicupdate/bug_29596.pl

diff --git a/Koha.pm b/Koha.pm
index 38b17d85a6..7ec5ba0511 100644
--- a/Koha.pm
+++ b/Koha.pm
@@ -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.11.16.000";
+$VERSION = "20.11.16.001";
 
 sub version {
     return $VERSION;
diff --git a/installer/data/mysql/atomicupdate/bug_29596.pl b/installer/data/mysql/atomicupdate/bug_29596.pl
deleted file mode 100755
index 95b032b95a..0000000000
--- a/installer/data/mysql/atomicupdate/bug_29596.pl
+++ /dev/null
@@ -1,51 +0,0 @@
-use Modern::Perl;
-
-return {
-    bug_number  => "29596",
-    description => "Add Yiddish language",
-    up => sub {
-        my ($args) = @_;
-        my ($dbh, $out) = @$args{qw(dbh out)};
-
-
-        $dbh->do(q{
-            INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added)
-            VALUES ( 'yi', 'language', 'Yiddish', NOW() );
-        });
-
-        $dbh->do(q{
-            INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code)
-            VALUES ( 'yi','yid');
-        });
-
-        $dbh->do(q{
-            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
-            VALUES ( 'yi', 'language', 'de', 'Jiddisch');
-        });
-
-        $dbh->do(q{
-            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
-            VALUES ( 'yi', 'language', 'en', 'Yiddish');
-        });
-
-        $dbh->do(q{
-            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
-            VALUES ( 'yi', 'language', 'es', 'Yidis');
-        });
-
-        $dbh->do(q{
-            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
-            VALUES ( 'yi', 'language', 'fr', 'Yiddish');
-        });
-
-        $dbh->do(q{
-            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
-            VALUES ( 'yi', 'language', 'yi', 'יידיש');
-        });
-
-        $dbh->do(q{
-            INSERT IGNORE INTO language_script_mapping(language_subtag,script_subtag)
-            VALUES ( 'yi', 'Hebr');
-        });
-    },
-}
diff --git a/installer/data/mysql/updatedatabase.pl b/installer/data/mysql/updatedatabase.pl
index 175a0798ac..7e607b1cc6 100755
--- a/installer/data/mysql/updatedatabase.pl
+++ b/installer/data/mysql/updatedatabase.pl
@@ -23778,6 +23778,50 @@ if ( CheckVersion( $DBversion ) ) {
     NewVersion( $DBversion, "", "Koha 20.11.16 release" );
 }
 
+$DBversion = '20.11.16.001';
+if( CheckVersion( $DBversion ) ) {
+    $dbh->do(q{
+            INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added)
+            VALUES ( 'yi', 'language', 'Yiddish', NOW() );
+        });
+
+        $dbh->do(q{
+            INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code)
+            VALUES ( 'yi','yid');
+        });
+
+        $dbh->do(q{
+            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
+            VALUES ( 'yi', 'language', 'de', 'Jiddisch');
+        });
+
+        $dbh->do(q{
+            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
+            VALUES ( 'yi', 'language', 'en', 'Yiddish');
+        });
+
+        $dbh->do(q{
+            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
+            VALUES ( 'yi', 'language', 'es', 'Yidis');
+        });
+
+        $dbh->do(q{
+            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
+            VALUES ( 'yi', 'language', 'fr', 'Yiddish');
+        });
+
+        $dbh->do(q{
+            INSERT IGNORE INTO language_descriptions(subtag, type, lang, description)
+            VALUES ( 'yi', 'language', 'yi', 'יידיש');
+        });
+
+        $dbh->do(q{
+            INSERT IGNORE INTO language_script_mapping(language_subtag,script_subtag)
+            VALUES ( 'yi', 'Hebr');
+        });
+    NewVersion( $DBversion, "29596", "Add Yiddish language" );
+}
+
 
 # SEE bug 13068
 # if there is anything in the atomicupdate, read and execute it.
-- 
2.39.5