Bug 32799: DBRev 22.12.00.009
authorTomas Cohen Arazi <tomascohen@theke.io>
Mon, 27 Feb 2023 16:01:30 +0000 (13:01 -0300)
committerTomas Cohen Arazi <tomascohen@theke.io>
Mon, 27 Feb 2023 16:08:11 +0000 (13:08 -0300)
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Koha.pm
installer/data/mysql/atomicupdate/bug_32799_ill_status_alias.pl [deleted file]
installer/data/mysql/db_revs/221200009.pl [new file with mode: 0755]

diff --git a/Koha.pm b/Koha.pm
index 9551458..1fc4812 100644 (file)
--- 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 = "22.12.00.008";
+$VERSION = "22.12.00.009";
 
 sub version {
     return $VERSION;
diff --git a/installer/data/mysql/atomicupdate/bug_32799_ill_status_alias.pl b/installer/data/mysql/atomicupdate/bug_32799_ill_status_alias.pl
deleted file mode 100755 (executable)
index c3df54b..0000000
+++ /dev/null
@@ -1,14 +0,0 @@
-use Modern::Perl;
-
-return {
-    bug_number => "32799",
-    description => "Rename ILLSTATUS authorised value category",
-    up => sub {
-        my ($args) = @_;
-        my ($dbh, $out) = @$args{qw(dbh out)};
-        # Do you stuffs here
-        $dbh->do(q{UPDATE authorised_value_categories SET category_name = "ILL_STATUS_ALIAS" WHERE category_name = "ILLSTATUS"});
-        # Print useful stuff here
-        say $out "Renamed authorised value category 'ILLSTATUS' to 'ILL_STATUS_ALIAS'";;
-    },
-};
diff --git a/installer/data/mysql/db_revs/221200009.pl b/installer/data/mysql/db_revs/221200009.pl
new file mode 100755 (executable)
index 0000000..c3df54b
--- /dev/null
@@ -0,0 +1,14 @@
+use Modern::Perl;
+
+return {
+    bug_number => "32799",
+    description => "Rename ILLSTATUS authorised value category",
+    up => sub {
+        my ($args) = @_;
+        my ($dbh, $out) = @$args{qw(dbh out)};
+        # Do you stuffs here
+        $dbh->do(q{UPDATE authorised_value_categories SET category_name = "ILL_STATUS_ALIAS" WHERE category_name = "ILLSTATUS"});
+        # Print useful stuff here
+        say $out "Renamed authorised value category 'ILLSTATUS' to 'ILL_STATUS_ALIAS'";;
+    },
+};