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 |
|