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

(-)a/C4/Context.pm (-2 / +2 lines)
Lines 496-501 preference. Link Here
496
sub set_preference {
496
sub set_preference {
497
    my ( $self, $variable, $value, $explanation, $type, $options ) = @_;
497
    my ( $self, $variable, $value, $explanation, $type, $options ) = @_;
498
498
499
    my $variable_case = $variable;
499
    $variable = lc $variable;
500
    $variable = lc $variable;
500
501
501
    my $syspref = Koha::Config::SysPrefs->find($variable);
502
    my $syspref = Koha::Config::SysPrefs->find($variable);
Lines 521-527 sub set_preference { Link Here
521
        )->store;
522
        )->store;
522
    } else {
523
    } else {
523
        $syspref = Koha::Config::SysPref->new(
524
        $syspref = Koha::Config::SysPref->new(
524
            {   variable    => $variable,
525
            {   variable    => $variable_case,
525
                value       => $value,
526
                value       => $value,
526
                explanation => $explanation || undef,
527
                explanation => $explanation || undef,
527
                type        => $type,
528
                type        => $type,
528
- 

Return to bug 19788