From c41c02271d2471751b0a8692024fdad706b9e598 Mon Sep 17 00:00:00 2001
From: tonnesen <tonnesen>
Date: Wed, 11 Jun 2003 18:44:01 +0000
Subject: [PATCH] Changing "preference()" calls to "boolean_preference()" calls

---
 C4/Print.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/C4/Print.pm b/C4/Print.pm
index 46b5bf2cde..042f122440 100644
--- a/C4/Print.pm
+++ b/C4/Print.pm
@@ -75,7 +75,7 @@ from C<&currentissues>.
 sub remoteprint {
   my ($env,$items,$borrower)=@_;
 
-  (return) unless (C4::Context->preference('printcirculationslips'));
+  (return) unless (C4::Context->boolean_preference('printcirculationslips'));
   my $file=time;		# FIXME - Not used
   my $queue = $env->{'queue'};
   # FIXME - If 'queue' is undefined or empty, then presumably it should
@@ -131,7 +131,7 @@ sub printreserve {
   my($env, $branchname, $bordata, $itemdata)=@_;
   my $file=time;
   my $printer = $env->{'printer'};
-  (return) unless (C4::Context->preference('printreserveslips'));
+  (return) unless (C4::Context->boolean_preference('printreserveslips'));
   if ($printer eq "" || $printer eq 'nulllp') {
     open (PRINTER,">>/tmp/kohares");
   } else {
@@ -184,7 +184,7 @@ will print to the file F</tmp/kohares>.
 sub printslip {
   my($env, $slip)=@_;
   my $printer = $env->{'printer'};
-  (return) unless (C4::Context->preference('printcirculationslips'));
+  (return) unless (C4::Context->boolean_preference('printcirculationslips'));
   if ($printer eq "" || $printer eq 'nulllp') {
     open (PRINTER,">/tmp/kohares");
   } else {
-- 
2.39.5