From 7645b4b22997ded887c4ea8e5aed57efac12e90a Mon Sep 17 00:00:00 2001
From: Pedro Amorim <pedro.amorim@ptfs-europe.com>
Date: Thu, 14 Nov 2024 09:52:28 -0100
Subject: [PATCH] Bug 38441: atomicupdate

---
 .../data/mysql/atomicupdate/bug_38441.pl      | 24 +++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 installer/data/mysql/atomicupdate/bug_38441.pl

diff --git a/installer/data/mysql/atomicupdate/bug_38441.pl b/installer/data/mysql/atomicupdate/bug_38441.pl
new file mode 100644
index 0000000000..4ad8cc12e1
--- /dev/null
+++ b/installer/data/mysql/atomicupdate/bug_38441.pl
@@ -0,0 +1,24 @@
+use Modern::Perl;
+use Koha::Installer::Output qw(say_warning say_failure say_success say_info);
+
+use C4::Context;
+
+return {
+    bug_number  => "38441",
+    description => "Add 'ILLHistoryCheck' 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 (
+                            'ILLHistoryCheck', '', '',
+                                'If ON, during the ILL request process, a check is performed to see if the ILL request has already been previously placed',
+                        'YesNo'
+                    );
+                }
+            );
+            say $out "Added new system preference 'ILLHistoryCheck'";
+        },
+};
-- 
2.39.5