Lines 541-547
sub preference {
Link Here
|
541 |
my $self = shift; |
541 |
my $self = shift; |
542 |
my $var = shift; # The system preference to return |
542 |
my $var = shift; # The system preference to return |
543 |
|
543 |
|
544 |
my $cached_var = $syspref_cache->get_from_cache("syspref_$var") if $use_syspref_cache; |
544 |
my $cached_var; |
|
|
545 |
$cached_var = $syspref_cache->get_from_cache("syspref_$var") if $use_syspref_cache; |
545 |
return $cached_var if defined $cached_var; |
546 |
return $cached_var if defined $cached_var; |
546 |
|
547 |
|
547 |
my $dbh = C4::Context->dbh or return 0; |
548 |
my $dbh = C4::Context->dbh or return 0; |
548 |
- |
|
|