View | Details | Raw Unified | Return to bug 13515
Collapse All | Expand All

(-)a/installer/data/mysql/atomicupdate/bug_13515.perl (-2 / +1 lines)
Lines 1-7 Link Here
1
$DBversion = 'XXX';  # will be replaced by the RM
1
$DBversion = 'XXX';  # will be replaced by the RM
2
if( CheckVersion( $DBversion ) ) {
2
if( CheckVersion( $DBversion ) ) {
3
3
4
    unless( foreign_key_exists( 'messages', 'borrowernumber' ) ) {
4
    unless( foreign_key_exists( 'messages', 'messages_borrowernumber' ) ) {
5
        $dbh->do(q|
5
        $dbh->do(q|
6
            DELETE m FROM messages m
6
            DELETE m FROM messages m
7
            LEFT JOIN borrowers b ON m.borrowernumber=b.borrowernumber
7
            LEFT JOIN borrowers b ON m.borrowernumber=b.borrowernumber
8
- 

Return to bug 13515