Lines 9660-9672
$DBversion = "3.19.00.XXX";
Link Here
|
9660 |
if ( CheckVersion($DBversion) ) { |
9660 |
if ( CheckVersion($DBversion) ) { |
9661 |
$dbh->do(q| |
9661 |
$dbh->do(q| |
9662 |
INSERT INTO userflags (bit, flag, flagdesc, defaulton) VALUES |
9662 |
INSERT INTO userflags (bit, flag, flagdesc, defaulton) VALUES |
9663 |
(20, 'shelves', 'Virtual shelves', 0) |
9663 |
(20, 'lists', 'Lists', 0) |
9664 |
|); |
9664 |
|); |
9665 |
$dbh->do(q| |
9665 |
$dbh->do(q| |
9666 |
INSERT INTO permissions (module_bit, code, description) VALUES |
9666 |
INSERT INTO permissions (module_bit, code, description) VALUES |
9667 |
(20, 'delete_shelves', 'Delete shelves') |
9667 |
(20, 'delete_public_lists', 'Delete public lists') |
9668 |
|); |
9668 |
|); |
9669 |
print "Upgrade to $DBversion done (Bug 13417: Add permission to delete shelves)\n"; |
9669 |
print "Upgrade to $DBversion done (Bug 13417: Add permission to delete public lists)\n"; |
9670 |
SetVersion ($DBversion); |
9670 |
SetVersion ($DBversion); |
9671 |
} |
9671 |
} |
9672 |
|
9672 |
|
9673 |
- |
|
|