# - #4 : the developer version. The 4th number is the database subversion.
# used by developers when the database changes. updatedatabase take care of the changes itself
# and is automatically called by Auth.pm when needed.
-$VERSION = "22.12.00.002";
+$VERSION = "22.12.00.003";
sub version {
return $VERSION;
+++ /dev/null
-use Modern::Perl;
-
-return {
- bug_number => "20256",
- description => "Add ability to limit editing of items to home library",
- up => sub {
- my ($args) = @_;
- my ($dbh, $out) = @$args{qw(dbh out)};
-
- $dbh->do(q{
- INSERT IGNORE INTO permissions (module_bit, code, description) VALUES ( 9, 'edit_any_item', 'Edit any item reguardless of home library');
- });
- say $out "Added new permission 'edit_any_item'";
-
- $dbh->do(q{
- INSERT IGNORE INTO user_permissions ( borrowernumber, module_bit, code )
- SELECT borrowernumber, '9', 'edit_any_item'
- FROM user_permissions
- WHERE module_bit = '9'
- AND code = 'edit_items'
- });
-
- if ( !column_exists( 'library_groups', 'ft_limit_item_editing' ) ) {
- $dbh->do(q{
- ALTER TABLE library_groups
- ADD COLUMN ft_limit_item_editing tinyint(1) NOT NULL DEFAULT 0 AFTER ft_hide_patron_info
- });
-
- say $out "Added column 'library_groups.ft_limit_item_editing'";
- }
- },
-};
--- /dev/null
+use Modern::Perl;
+
+return {
+ bug_number => "20256",
+ description => "Add ability to limit editing of items to home library",
+ up => sub {
+ my ($args) = @_;
+ my ($dbh, $out) = @$args{qw(dbh out)};
+
+ $dbh->do(q{
+ INSERT IGNORE INTO permissions (module_bit, code, description) VALUES ( 9, 'edit_any_item', 'Edit any item reguardless of home library');
+ });
+ say $out "Added new permission 'edit_any_item'";
+
+ $dbh->do(q{
+ INSERT IGNORE INTO user_permissions ( borrowernumber, module_bit, code )
+ SELECT borrowernumber, '9', 'edit_any_item'
+ FROM user_permissions
+ WHERE module_bit = '9'
+ AND code = 'edit_items'
+ });
+
+ if ( !column_exists( 'library_groups', 'ft_limit_item_editing' ) ) {
+ $dbh->do(q{
+ ALTER TABLE library_groups
+ ADD COLUMN ft_limit_item_editing tinyint(1) NOT NULL DEFAULT 0 AFTER ft_hide_patron_info
+ });
+
+ say $out "Added column 'library_groups.ft_limit_item_editing'";
+ }
+ },
+};