View | Details | Raw Unified | Return to bug 25193
Collapse All | Expand All

(-)a/installer/data/mysql/atomicupdate/bug_25193-add_AllowRenewalIfOtherItemsAvailableLocation_syspref.pl (-3 / +3 lines)
Lines 1-8 Link Here
1
use Modern::Perl;
1
use Modern::Perl;
2
use Koha::Installer::Output qw(say_warning say_success say_info);
2
3
3
return {
4
return {
4
    bug_number  => "25193",
5
    bug_number  => "25193",
5
    description => "Add syspref to control location for use of AllowRenewalIfOtherItemsAvailable",
6
    description => "Add system preference to control location for use of AllowRenewalIfOtherItemsAvailable",
6
    up          => sub {
7
    up          => sub {
7
        my ($args) = @_;
8
        my ($args) = @_;
8
        my ( $dbh, $out ) = @$args{qw(dbh out)};
9
        my ( $dbh, $out ) = @$args{qw(dbh out)};
Lines 11-16 return { Link Here
11
            q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('AllowRenewalIfOtherItemsAvailableLocation', 'any', 'any|holdbranch', 'Specify where items must be available for fulfilling holds to allow a renewal.', 'Choice') }
12
            q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('AllowRenewalIfOtherItemsAvailableLocation', 'any', 'any|holdbranch', 'Specify where items must be available for fulfilling holds to allow a renewal.', 'Choice') }
12
        );
13
        );
13
14
14
        say $out "Added system preference 'AllowRenewalIfOtherItemsAvailableLocation'";
15
        say_success( $out, "Added new system preference 'AllowRenewalIfOtherItemsAvailableLocation'" );
15
    },
16
    },
16
};
17
};
17
- 

Return to bug 25193