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

(-)a/installer/data/mysql/updatedatabase.pl (-1 / +9 lines)
Lines 7912-7917 if ( CheckVersion($DBversion) ) { Link Here
7912
    SetVersion($DBversion);
7912
    SetVersion($DBversion);
7913
}
7913
}
7914
7914
7915
$DBversion = "3.15.00.XXX";
7916
if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
7917
    my $borrowernumbers = $dbh->selectcol_arrayref("SELECT DISTINCT borrowernumber FROM user_permissions WHERE module_bit=15 AND code='claim_serials'");
7918
    my $sth = $dbh->prepare("INSERT INTO user_permissions(borrowernumber, module_bit, code) VALUES (?, 15, 'superserials')");
7919
    $sth->execute( $_ ) for @$borrowernumbers;
7920
    print "Upgrade to $DBversion done (Bug 8438 - Set the superserials permission for all users with the claim_serials permission.)\n";
7921
    SetVersion ($DBversion);
7922
}
7923
7915
=head1 FUNCTIONS
7924
=head1 FUNCTIONS
7916
7925
7917
=head2 TableExists($table)
7926
=head2 TableExists($table)
7918
- 

Return to bug 8438