From 539974308c10c5618eb844b5a40039fed2e804b4 Mon Sep 17 00:00:00 2001 From: Joe Atzberger Date: Tue, 23 Oct 2007 14:07:18 -0500 Subject: [PATCH] Context.pm: Trivial adjustment for clarity. Signed-off-by: Chris Cormack Signed-off-by: Joshua Ferraro --- C4/Context.pm | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/C4/Context.pm b/C4/Context.pm index a868df7eaf..d238d97e2b 100644 --- a/C4/Context.pm +++ b/C4/Context.pm @@ -424,10 +424,7 @@ sub preference my $self = shift; my $var = shift; # The system preference to return my $retval; # Return value - my $dbh = C4::Context->dbh; # Database handle - if ($dbh){ - my $sth; # Database query handle - + my $dbh = C4::Context->dbh or return 0; # Look up systempreferences.variable==$var $retval = $dbh->selectrow_array(<