|
Lines 21-29
return {
Link Here
|
| 21 |
$dbh->do(q{ALTER TABLE user_permissions DROP COLUMN temp}); |
21 |
$dbh->do(q{ALTER TABLE user_permissions DROP COLUMN temp}); |
| 22 |
say $out "Removed any duplicate rows"; |
22 |
say $out "Removed any duplicate rows"; |
| 23 |
|
23 |
|
|
|
24 |
if ( foreign_key_exists('user_permissions', 'user_permissions_ibfk_2') ) { |
| 25 |
$dbh->do(q{ |
| 26 |
ALTER TABLE user_permissions DROP FOREIGN KEY user_permissions_ibfk_2 |
| 27 |
}); |
| 28 |
} |
| 24 |
$dbh->do(q{ |
29 |
$dbh->do(q{ |
| 25 |
ALTER TABLE user_permissions ADD CONSTRAINT PK_borrowernumber_module_code PRIMARY KEY (borrowernumber,module_bit,code) |
30 |
ALTER TABLE user_permissions ADD CONSTRAINT PK_borrowernumber_module_code PRIMARY KEY (borrowernumber,module_bit,code) |
| 26 |
}); |
31 |
}); |
|
|
32 |
$dbh->do(q{ |
| 33 |
ALTER TABLE user_permissions |
| 34 |
ADD CONSTRAINT `user_permissions_ibfk_2` FOREIGN KEY (`module_bit`, `code`) REFERENCES `permissions` (`module_bit`, `code`) ON DELETE CASCADE ON UPDATE CASCADE; |
| 35 |
}); |
| 27 |
say $out "Added a primary key on user_permissions on borrowernumber, module_bit, code"; |
36 |
say $out "Added a primary key on user_permissions on borrowernumber, module_bit, code"; |
| 28 |
} |
37 |
} |
| 29 |
}, |
38 |
}, |
| 30 |
- |
|
|