From 2fe34a2a06aee181857bc06275f128f228afd155 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Thu, 6 May 2010 14:51:05 -0700
Subject: [PATCH] more ProfileField tests

---
 t/ProfileField.t | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/t/ProfileField.t b/t/ProfileField.t
index 76fcfc84e..2faeaa580 100644
--- a/t/ProfileField.t
+++ b/t/ProfileField.t
@@ -33,7 +33,7 @@ WebGUI::Test->usersToDelete($newUser);
 #----------------------------------------------------------------------------
 # Tests
 
-plan tests => 48;        # Increment this number for each test you create
+plan tests => 50;        # Increment this number for each test you create
 
 #----------------------------------------------------------------------------
 # Test the creation of ProfileField
@@ -91,6 +91,8 @@ my $newProfileField = WebGUI::ProfileField->create($session, 'testField', {
 });
 
 is($newProfileField->get('fieldType'), 'Float', 'create: makes field with correct type');
+is $newProfileField->get('fieldName'), 'testField', '...correct fieldName';
+is $newProfileField->getId, 'testField', '...correct id';
 is($newProfileField->get('label'), 'Test Field', 'correct label');
 is($newProfileField->getLabel, 'Test Field', 'getLabel works, too');