From dbd1104279d2d177f93ea027ca85a97157c87e19 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Thu, 15 Aug 2002 02:01:23 +0000
Subject: [PATCH] Fixed scoping problem

---
 lib/WebGUI/Wobject.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/WebGUI/Wobject.pm b/lib/WebGUI/Wobject.pm
index 1788d69a3..92b5de541 100644
--- a/lib/WebGUI/Wobject.pm
+++ b/lib/WebGUI/Wobject.pm
@@ -565,7 +565,7 @@ sub set {
 =cut
 
 sub setCollateral {
-	my ($key, $sql, $properties, $seq, $dbkeys, $dbvalues, $counter);
+	my ($key, $sql, $seq, $dbkeys, $dbvalues, $counter);
 	my ($class, $table, $keyName, $properties, $useSequence, $useWobjectId) = @_;
 	$counter = 0;
 	if ($properties->{$keyName} eq "new" || $properties->{$keyName} eq "") {