From 38eed4fc4179a7a4be73eefc5195ef72a45d1e99 Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Wed, 20 Mar 2013 14:46:07 +0100 Subject: [PATCH] Bug 8378 - followup - update notices to use <> Didn't break on well-formed notices, and fixed those with problems Signed-off-by: Tomas Cohen Arazi Signed-off-by: Jonathan Druart Signed-off-by: Jared Camins-Esakov --- installer/data/mysql/updatedatabase.pl | 17 ++++++++++++++++- 1 file changed, 16 insertions(+), 1 deletion(-) diff --git a/installer/data/mysql/updatedatabase.pl b/installer/data/mysql/updatedatabase.pl index e0bcad0b5d..1f5283d9f8 100755 --- a/installer/data/mysql/updatedatabase.pl +++ b/installer/data/mysql/updatedatabase.pl @@ -6683,7 +6683,22 @@ if ( CheckVersion($DBversion) ) { SetVersion ($DBversion); } - +$DBversion = '3.11.00.XXX'; +if ( CheckVersion($DBversion) ) { + my $sth = $dbh->prepare(" + SELECT module, code, branchcode, content + FROM letter + WHERE content LIKE '%%' + "); + $sth->execute; + my $sth_update = $dbh->prepare("UPDATE letter SET content = ? WHERE module = ? AND code = ? AND branchcode = ?"); + while(my $row = $sth->fetchrow_hashref){ + $row->{content} =~ s/\w+<\/fine>/<>/; + $sth_update->execute($row->{content}, $row->{module}, $row->{code}, $row->{branchcode}); + } + print "Upgrade to $DBversion done (use new <> syntax in notices)\n"; + SetVersion ($DBversion); +} =head1 FUNCTIONS -- 2.39.5