fixed logic error
authorerickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Wed, 23 Feb 2005 23:34:34 +0000 (23:34 +0000)
committererickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Wed, 23 Feb 2005 23:34:34 +0000 (23:34 +0000)
git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@99 9efc2488-bf62-4759-914b-345cdb29e865

src/perlmods/OpenSRF/Utils/SettingsClient.pm

index 6dbf96e..9882d4c 100755 (executable)
@@ -16,7 +16,7 @@ $host_config = undef;
 my $we_cache = 1;
 sub set_cache {
        my($self, $val) = @_;
-       if($val) { $we_cache = 1; }
+       if(defined($val)) { $we_cache = $val; }
 }