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

(-)a/installer/data/mysql/atomicupdate/add-system-preference-EmailOverduesNoEmail.perl (-6 / +11 lines)
Lines 1-9 Link Here
1
$DBversion = 'XXX';
1
use Modern::Perl;
2
if ( CheckVersion($DBversion ) ) {
2
 
3
    $dbh->do(q{
3
{
4
    bug_number => "20076",
5
    description => "Add system preference EmailOverduesNoEmail",
6
    up => sub {
7
        my ($args) = @_;
8
        my ($dbh, $out) = @$args{qw(dbh out)};
9
 
10
        $dbh->do(q{
4
            INSERT IGNORE INTO systempreferences (`variable`,`value`,`options`,`explanation`,`type`)
11
            INSERT IGNORE INTO systempreferences (`variable`,`value`,`options`,`explanation`,`type`)
5
            VALUES ('EmailOverduesNoEmail','0','','Set mail sending to staff for patron has overdues but no email address', 'YesNo')
12
            VALUES ('EmailOverduesNoEmail','0','','Set mail sending to staff for patron has overdues but no email address', 'YesNo')
6
            });
13
            });
7
14
    },
8
    NewVersion( $DBversion,'20076','Add system preference EmailOverduesNoEmail');
9
}
15
}
10
- 

Return to bug 20076