diff --git a/t/AdSpace.t b/t/AdSpace.t
index 2f526ae80..ec699f0a5 100644
--- a/t/AdSpace.t
+++ b/t/AdSpace.t
@@ -31,7 +31,7 @@ SKIP: {
 
 	skip "Unable to load WebGUI::AdSpace", $numTests-1 unless $loaded;
 
-	my $adSpace = WebGUI::AdSpace->create($session, {name=>"Alfred"});
+	$adSpace = WebGUI::AdSpace->create($session, {name=>"Alfred"});
 
 	isa_ok($adSpace, 'WebGUI::AdSpace');
 
diff --git a/t/Form/Text.t b/t/Form/Text.t
index cd6b33d16..de3821c31 100644
--- a/t/Form/Text.t
+++ b/t/Form/Text.t
@@ -46,6 +46,12 @@ my $testBlock = [
 		expected  => 'EQUAL',
 		comment   => 'single word',
 	},
+	{
+		key => 'Text4',
+		testValue => '0leadingzero',
+		expected  => 'EQUAL',
+		comment   => 'leading zero',
+	},
 ];
 
 my $formType = 'text';