|
Line 0
Link Here
|
|
|
1 |
UPDATE borrowers |
| 2 |
SET flags = flags - ( flags & (1<<7) ) |
| 3 |
WHERE flags IS NOT NULL |
| 4 |
AND flags > 0; |
| 5 |
|
| 6 |
DELETE FROM userflags WHERE bit=7; |
| 7 |
|
| 8 |
-- $DBversion = "3.19.00.XXX"; |
| 9 |
-- if ( CheckVersion($DBversion) ) { |
| 10 |
-- # Remove the borrow permission flag (bit 7) |
| 11 |
-- $dbh->do(q| |
| 12 |
-- UPDATE borrowers |
| 13 |
-- SET flags = flags - ( flags & (1<<7) ) |
| 14 |
-- WHERE flags IS NOT NULL |
| 15 |
-- AND flags > 0 |
| 16 |
-- |); |
| 17 |
-- $dbh->do(q| |
| 18 |
-- DELETE FROM userflags WHERE bit=7; |
| 19 |
-- |); |
| 20 |
-- print "Upgrade to $DBversion done (Bug 7976 - Remove the 'borrow' permission)\n"; |
| 21 |
-- SetVersion($DBversion); |
| 22 |
-- } |
| 23 |
|