From 3fb4d33817c46df59922483d721da65f450b3325 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Wed, 18 Jan 2006 21:46:38 +0000
Subject: [PATCH] a little cleaner

---
 lib/WebGUI/Session/ErrorHandler.pm | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/lib/WebGUI/Session/ErrorHandler.pm b/lib/WebGUI/Session/ErrorHandler.pm
index 461c6cee9..9af856ba7 100644
--- a/lib/WebGUI/Session/ErrorHandler.pm
+++ b/lib/WebGUI/Session/ErrorHandler.pm
@@ -321,7 +321,7 @@ sub new {
  		Log::Log4perl->init( $session->config->getWebguiRoot."/etc/log.conf" );   
 	}
 	my $logger = Log::Log4perl->get_logger($session->config->getFilename);
-	bless {_logger=>$logger, _session=>$session}, $class;
+	bless {_queryCount=>0, _logger=>$logger, _session=>$session}, $class;
 }
 
 #-------------------------------------------------------------------
@@ -338,9 +338,8 @@ A sql statement string.
 
 sub query {
 	my $self = shift;
-	$self->{_query} = 0 unless $self->{_query};
-	$self->{_query} = $self->{_query} + 1;
-	$self->debug("query  ".$self->{_query}.'  '.shift);
+	$self->{_queryCount}++;
+	$self->debug("query  ".$self->{_queryCount}.':  '.shift);
 }