@@ -, +, @@ SELECT code, name, message_transport_type FROM letter WHERE code="PREDUE" OR code="OVERDUE"; --- installer/data/mysql/updatedatabase.pl | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) --- a/installer/data/mysql/updatedatabase.pl +++ a/installer/data/mysql/updatedatabase.pl @@ -12219,6 +12219,30 @@ if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) { print "Upgrade to $DBversion done (Bug 15008 - Add custom HTML areas to circulation and reports home pages)\n"; SetVersion($DBversion); } + +$DBversion = "XXX"; +if ( CheckVersion($DBversion) ) { + my $letters = $dbh->selectall_arrayref(q| + SELECT code, name + FROM letter + WHERE message_transport_type="email" + |, { Slice => {} }); + for my $letter ( @$letters ) { + use Data::Dumper;warn Dumper $letter; + $dbh->do(q| + UPDATE letter + SET name = ? + WHERE code = ? + AND message_transport_type <> "email" + |, undef, $letter->{name}, $letter->{code}); + } + + print "Upgrade to $DBversion done (Bug 16217: Resync names of notices)\n"; + SetVersion($DBversion); +} + + + # DEVELOPER PROCESS, search for anything to execute in the db_update directory # SEE bug 13068 # if there is anything in the atomicupdate, read and execute it. --