From 10010f101ff4ce2b864c43e182d73cb69cac794f Mon Sep 17 00:00:00 2001
From: Aleisha Amohia <aleishaamohia@hotmail.com>
Date: Fri, 13 Jan 2023 22:29:59 +1300
Subject: [PATCH] Bug 32731: Add CataloguingToolsInToolsHome system preference

Signed-off-by: Owen Leonard <oleonard@myacpl.org>
---
 ...31_-_add_CataloguingToolsInToolsHome_syspref.pl | 14 ++++++++++++++
 installer/data/mysql/mandatory/sysprefs.sql        |  1 +
 .../en/modules/admin/preferences/cataloguing.pref  |  6 ++++++
 3 files changed, 21 insertions(+)
 create mode 100755 installer/data/mysql/atomicupdate/bug_32731_-_add_CataloguingToolsInToolsHome_syspref.pl

diff --git a/installer/data/mysql/atomicupdate/bug_32731_-_add_CataloguingToolsInToolsHome_syspref.pl b/installer/data/mysql/atomicupdate/bug_32731_-_add_CataloguingToolsInToolsHome_syspref.pl
new file mode 100755
index 0000000000..d30d214552
--- /dev/null
+++ b/installer/data/mysql/atomicupdate/bug_32731_-_add_CataloguingToolsInToolsHome_syspref.pl
@@ -0,0 +1,14 @@
+use Modern::Perl;
+
+return {
+    bug_number => "32731",
+    description => "Add CataloguingToolsInToolsHome system preference",
+    up => sub {
+        my ($args) = @_;
+        my ($dbh, $out) = @$args{qw(dbh out)};
+
+        $dbh->do(q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('CataloguingToolsInToolsHome', '0', NULL, 'Show cataloguing tools in Tools Home menu, additional to Cataloguing Home', 'YesNo') });
+
+        say $out "Added system preference 'CataloguingToolsInToolsHome'";
+    },
+};
diff --git a/installer/data/mysql/mandatory/sysprefs.sql b/installer/data/mysql/mandatory/sysprefs.sql
index beebd27a6f..5bdfe37df2 100644
--- a/installer/data/mysql/mandatory/sysprefs.sql
+++ b/installer/data/mysql/mandatory/sysprefs.sql
@@ -133,6 +133,7 @@ INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `
 ('casServerVersion','2', '2|3','Version of the CAS server Koha will connect to.','Choice'),
 ('CatalogModuleRelink','0',NULL,'If OFF the linker will never replace the authids that are set in the cataloging module.','YesNo'),
 ('CataloguingLog','1',NULL,'If ON, log edit/create/delete actions on bibliographic data. WARNING: this feature is very resource consuming.','YesNo'),
+('CataloguingToolsInToolsHome', '0', NULL, 'Show cataloguing tools in Tools Home menu, additional to Cataloguing Home', 'YesNo'),
 ('ChargeFinesOnClosedDays','0',NULL,'Charge fines on days the library is closed.','YesNo'),
 ('CheckPrevCheckout','hardno','hardyes|softyes|softno|hardno','By default, for every item checked out, should we warn if the patron has borrowed that item in the past?','Choice'),
 ('CheckPrevCheckoutDelay','0', NULL,'Maximum number of days that will trigger a warning if the patron has borrowed that item in the past when CheckPrevCheckout is enabled.','free'),
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/cataloguing.pref b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/cataloguing.pref
index b28bf50099..0060e6d2a6 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/cataloguing.pref
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/cataloguing.pref
@@ -318,6 +318,12 @@ Cataloging:
                   dsc: descending.
                   az: from A to Z.
                   za: from Z to A.
+        -
+            - pref: CataloguingToolsInToolsHome
+              choices:
+                  1: "Show"
+                  0: "Don't show"
+            - cataloguing tools in the Tools Home page, additional to Cataloguing Home page.
     Importing:
         -
             - When matching on ISBN with the record import tool,
-- 
2.20.1