From 42dfd79f1a4adc97f742194f3f14e111a6632263 Mon Sep 17 00:00:00 2001
From: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Date: Tue, 9 Apr 2019 12:00:16 +0100
Subject: [PATCH] Bug 21953: (QA follow-up) Corrections to DB Update

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
---
 installer/data/mysql/atomicupdate/bug_21953.perl | 6 ++++++
 installer/data/mysql/atomicupdate/bug_21953.sql  | 1 -
 2 files changed, 6 insertions(+), 1 deletion(-)
 create mode 100644 installer/data/mysql/atomicupdate/bug_21953.perl
 delete mode 100644 installer/data/mysql/atomicupdate/bug_21953.sql

diff --git a/installer/data/mysql/atomicupdate/bug_21953.perl b/installer/data/mysql/atomicupdate/bug_21953.perl
new file mode 100644
index 0000000000..8f97520150
--- /dev/null
+++ b/installer/data/mysql/atomicupdate/bug_21953.perl
@@ -0,0 +1,6 @@
+$DBversion = 'XXX';    # will be replaced by the RM
+if ( CheckVersion($DBversion) ) {
+    $dbh->do("UPDATE accountlines SET description = REPLACE(description, 'Lost Item ', '') WHERE description LIKE 'Lost Item %'");
+    SetVersion($DBversion);
+    print "Upgrade to $DBversion done (Bug 21953 - Remove 'Lost Item' text from accountlines description)\n";
+}
diff --git a/installer/data/mysql/atomicupdate/bug_21953.sql b/installer/data/mysql/atomicupdate/bug_21953.sql
deleted file mode 100644
index 8a18635bd6..0000000000
--- a/installer/data/mysql/atomicupdate/bug_21953.sql
+++ /dev/null
@@ -1 +0,0 @@
-UPDATE accountlines SET description=REGEXP_REPLACE(description, '^Lost Item ', '') WHERE accounttype="PF";
-- 
2.20.1