From 4bb18886da48d064af4b80ab7cb21813f072b332 Mon Sep 17 00:00:00 2001
From: Doug Bell <doug@plainblack.com>
Date: Tue, 4 Jan 2011 20:10:35 -0600
Subject: [PATCH] move Profile editSettingsForm to Formbuilder

---
 lib/WebGUI/Account/Profile.pm          | 14 +++++++-------
 t/tests/Test/WebGUI/Account/Profile.pm | 18 ++++++++++++++++++
 2 files changed, 25 insertions(+), 7 deletions(-)
 create mode 100644 t/tests/Test/WebGUI/Account/Profile.pm

diff --git a/lib/WebGUI/Account/Profile.pm b/lib/WebGUI/Account/Profile.pm
index 72f624aa4..83915d8ab 100644
--- a/lib/WebGUI/Account/Profile.pm
+++ b/lib/WebGUI/Account/Profile.pm
@@ -146,37 +146,37 @@ sub editSettingsForm {
     my $session = $self->session;
     my $setting = $session->setting;
     my $i18n    = WebGUI::International->new($session,'Account_Profile');
-    my $f       = WebGUI::HTMLForm->new($session);
+    my $f       = WebGUI::FormBuilder->new($session);
 
-	$f->template(
+	$f->addField( "template",
 		name      => "profileStyleTemplateId",
 		value     => $self->getStyleTemplateId,
 		namespace => "style",
 		label     => $i18n->get("profile style template label"),
         hoverHelp => $i18n->get("profile style template hoverHelp")
 	);
-	$f->template(
+	$f->addField( "template",
 		name      => "profileLayoutTemplateId",
 		value     => $self->getLayoutTemplateId,
 		namespace => "Account/Layout",
 		label     => $i18n->get("profile layout template label"),
         hoverHelp => $i18n->get("profile layout template hoverHelp")
 	);
-	$f->template(
+	$f->addField( "template",
         name      => "profileEditTemplateId",
         value     => $self->getEditTemplateId,
         namespace => "Account/Profile/Edit",
         label     => $i18n->get("profile edit template label"),
         hoverHelp => $i18n->get("profile edit template hoverHelp")
 	);
-    $f->template(
+    $f->addField( "template",
         name      => "profileViewTemplateId",
         value     => $self->getViewTemplateId,
         namespace => "Account/Profile/View",
         label     => $i18n->get("profile view template label"),
         hoverHelp => $i18n->get("profile view template hoverHelp")
 	);
-    $f->template(
+    $f->addField( "template",
         name      => "profileErrorTemplateId",
         value     => $self->getErrorTemplateId,
         namespace => "Account/Profile/Error",
@@ -185,7 +185,7 @@ sub editSettingsForm {
 	);
 
 
-    return $f->printRowsOnly;
+    return $f;
 }
 
 
diff --git a/t/tests/Test/WebGUI/Account/Profile.pm b/t/tests/Test/WebGUI/Account/Profile.pm
new file mode 100644
index 000000000..54b349c14
--- /dev/null
+++ b/t/tests/Test/WebGUI/Account/Profile.pm
@@ -0,0 +1,18 @@
+package Test::WebGUI::Account::Profile;
+
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use strict;
+use warnings;
+
+use base qw/Test::WebGUI::Account/;
+
+1;