From ac6592a6693943fc79bb0bc8bbe1d878ed144261 Mon Sep 17 00:00:00 2001
From: acli <acli>
Date: Mon, 10 Feb 2003 06:37:00 +0000
Subject: [PATCH] Fixed completely wrong logic in my boolean_preference
 function

---
 C4/Context.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/C4/Context.pm b/C4/Context.pm
index 9fcdb09e9b..28946d06e8 100644
--- a/C4/Context.pm
+++ b/C4/Context.pm
@@ -329,8 +329,8 @@ EOT
 sub boolean_preference ($) {
 	my $self = shift;
 	my $var = shift;		# The system preference to return
-	my $it = preference($var);
-	return defined($it)? C4::Boolean::is_true($it): undef;
+	my $it = preference($self, $var);
+	return defined($it)? C4::Boolean::true_p($it): undef;
 }
 
 # AUTOLOAD
-- 
2.20.1