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

(-)a/C4/Context.pm (-2 / +1 lines)
Lines 463-469 my %sysprefs; Link Here
463 

          463
          

        

        

          464
          
sub preference {

          464
          
sub preference {

        

        

          465
          
    my $self = shift;

          465
          
    my $self = shift;

        

          
            

              466
              
    my $var  = shift;                          # The system preference to return


              466
              
    my $var  = lc(shift);                          # The system preference to return

            

        

          467
          

          467
          

        

        

          468
          
    if (exists $sysprefs{$var}) {

          468
          
    if (exists $sysprefs{$var}) {

        

        

          469
          
        return $sysprefs{$var};

          469
          
        return $sysprefs{$var};

        

            

              470
              
- 

              
              
            






  

  Return to bug 6132