Bug 14783: DBRev 22.06.00.064
authorTomas Cohen Arazi <tomascohen@theke.io>
Mon, 17 Oct 2022 20:33:34 +0000 (17:33 -0300)
committerTomas Cohen Arazi <tomascohen@theke.io>
Mon, 17 Oct 2022 20:33:34 +0000 (17:33 -0300)
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Koha.pm
installer/data/mysql/atomicupdate/bug_14783.pl [deleted file]
installer/data/mysql/db_revs/220600064.pl [new file with mode: 0755]

diff --git a/Koha.pm b/Koha.pm
index 65a2337..4f89bf0 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.06.00.063";
+$VERSION = "22.06.00.064";
 
 sub version {
     return $VERSION;
diff --git a/installer/data/mysql/atomicupdate/bug_14783.pl b/installer/data/mysql/atomicupdate/bug_14783.pl
deleted file mode 100755 (executable)
index fe5f7c0..0000000
+++ /dev/null
@@ -1,30 +0,0 @@
-use Modern::Perl;
-
-return {
-    bug_number  => "14783",
-    description => "Allow patrons to change pickup location for non-waiting holds",
-    up => sub {
-        my ($args) = @_;
-        my ($dbh, $out) = @$args{qw(dbh out)};
-
-        $dbh->do(q{
-            INSERT IGNORE INTO systempreferences (variable, value, options, explanation, type)
-            VALUES ('OPACAllowUserToChangeBranch','','Pending, In-Transit, Suspended','Allow users to change the library to pick up a hold for these statuses:','multiple');
-        });
-
-        $dbh->do(q{
-            UPDATE systempreferences SET value = (SELECT CASE WHEN value = 1 THEN 'intransit' ELSE '' END
-            FROM systempreferences
-            WHERE variable = 'OPACInTransitHoldPickupLocationChange')
-        });
-
-        say $out "Added new system preference 'OPACAllowUserToChangeBranch'";
-
-        $dbh->do(q{
-            DELETE FROM systempreferences
-            WHERE variable = 'OPACInTransitHoldPickupLocationChange'
-        });
-
-        say $out "Removed system preference 'OPACInTransitHoldPickupLocationChange'";
-    },
-};
diff --git a/installer/data/mysql/db_revs/220600064.pl b/installer/data/mysql/db_revs/220600064.pl
new file mode 100755 (executable)
index 0000000..fe5f7c0
--- /dev/null
@@ -0,0 +1,30 @@
+use Modern::Perl;
+
+return {
+    bug_number  => "14783",
+    description => "Allow patrons to change pickup location for non-waiting holds",
+    up => sub {
+        my ($args) = @_;
+        my ($dbh, $out) = @$args{qw(dbh out)};
+
+        $dbh->do(q{
+            INSERT IGNORE INTO systempreferences (variable, value, options, explanation, type)
+            VALUES ('OPACAllowUserToChangeBranch','','Pending, In-Transit, Suspended','Allow users to change the library to pick up a hold for these statuses:','multiple');
+        });
+
+        $dbh->do(q{
+            UPDATE systempreferences SET value = (SELECT CASE WHEN value = 1 THEN 'intransit' ELSE '' END
+            FROM systempreferences
+            WHERE variable = 'OPACInTransitHoldPickupLocationChange')
+        });
+
+        say $out "Added new system preference 'OPACAllowUserToChangeBranch'";
+
+        $dbh->do(q{
+            DELETE FROM systempreferences
+            WHERE variable = 'OPACInTransitHoldPickupLocationChange'
+        });
+
+        say $out "Removed system preference 'OPACInTransitHoldPickupLocationChange'";
+    },
+};