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

(-)a/C4/Context.pm (-9 / +6 lines)
Lines 512-530 sub preference { Link Here
512
512
513
    $var = lc $var;
513
    $var = lc $var;
514
514
515
    return $ENV{"OVERRIDE_SYSPREF_$var"}
516
        if defined $ENV{"OVERRIDE_SYSPREF_$var"};
517
515
    my $cached_var = $use_syspref_cache
518
    my $cached_var = $use_syspref_cache
516
        ? $syspref_cache->get_from_cache("syspref_$var")
519
        ? $syspref_cache->get_from_cache("syspref_$var")
517
        : undef;
520
        : undef;
518
    return $cached_var if defined $cached_var;
521
    return $cached_var if defined $cached_var;
519
522
520
    my $value;
523
    my $syspref;
521
    if ( defined $ENV{"OVERRIDE_SYSPREF_$var"} ) {
524
    eval { $syspref = Koha::Config::SysPrefs->find( lc $var ) };
522
        $value = $ENV{"OVERRIDE_SYSPREF_$var"};
525
    my $value = $syspref ? $syspref->value() : undef;
523
    } else {
524
        my $syspref;
525
        eval { $syspref = Koha::Config::SysPrefs->find( lc $var ) };
526
        $value = $syspref ? $syspref->value() : undef;
527
    }
528
526
529
    if ( $use_syspref_cache ) {
527
    if ( $use_syspref_cache ) {
530
        $syspref_cache->set_in_cache("syspref_$var", $value);
528
        $syspref_cache->set_in_cache("syspref_$var", $value);
531
- 

Return to bug 16068