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

(-)a/installer/data/mysql/atomicupdate/bug_36466.pl (-1 / +18 lines)
Line 0 Link Here
0
- 
1
use Modern::Perl;
2
3
return {
4
    bug_number  => "36466",
5
    description => "Fix the incorrect 0000-00-00 date in planneddate and publisheddate field",
6
    up          => sub {
7
        my ($args) = @_;
8
        my ( $dbh, $out ) = @$args{qw(dbh out)};
9
10
        # Do you stuffs here
11
        $dbh->do(q{update serial set planneddate=null where planneddate='0000-00-00';});
12
        $dbh->do(q{update serial set publisheddate=null where publisheddate='0000-00-00';});
13
14
        # Print useful stuff here
15
        # sysprefs
16
        say $out "incorrect date inplanneddate and publisheddate fixed";
17
    },
18
};

Return to bug 36466