[Koha-cvs] CVS: koha/C4 Context.pm,1.12,1.13

Ambrose Li acli at users.sourceforge.net
Mon Feb 10 07:37:03 CET 2003


Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1:/tmp/cvs-serv4622/C4

Modified Files:
	Context.pm 
Log Message:
Fixed completely wrong logic in my boolean_preference function


Index: Context.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Context.pm,v
retrieving revision 1.12
retrieving revision 1.13
diff -C2 -r1.12 -r1.13
*** Context.pm	6 Feb 2003 06:35:26 -0000	1.12
--- Context.pm	10 Feb 2003 06:37:00 -0000	1.13
***************
*** 330,335 ****
  	my $self = shift;
  	my $var = shift;		# The system preference to return
! 	my $it = preference($var);
! 	return defined($it)? C4::Boolean::is_true($it): undef;
  }
  
--- 330,335 ----
  	my $self = shift;
  	my $var = shift;		# The system preference to return
! 	my $it = preference($self, $var);
! 	return defined($it)? C4::Boolean::true_p($it): undef;
  }
  





More information about the Koha-cvs mailing list