From 9cb5c088b0dc878b9a1e4dd1d099d8e72e804f97 Mon Sep 17 00:00:00 2001
From: Doug Bell <doug@plainblack.com>
Date: Mon, 20 Dec 2010 16:44:41 -0600
Subject: [PATCH] add field and loop accessors

---
 lib/WebGUI/FormBuilder.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/FormBuilder.pm b/lib/WebGUI/FormBuilder.pm
index 8ae8bee9c..77ee52c61 100644
--- a/lib/WebGUI/FormBuilder.pm
+++ b/lib/WebGUI/FormBuilder.pm
@@ -224,10 +224,14 @@ sub toTemplateVars {
             my $props = $field->toTemplateVars;
             # Add the whole field to the vars
             $props->{ field } = $field->toHtml;
+            $var->{ "${prefix}_field_${name}" } = $props->{ field };
+            push @{$fieldLoop}, $props;
+            # Individual accessor
             for my $key ( keys %{$props} ) {
                 $var->{ "${prefix}_field_${name}_${key}" } = $props->{$key};
             }
-            push @{$fieldLoop}, $props;
+            # Loop accessor
+            push @{$var->{ "${prefix}_field_${name}_loop" }}, $props;
         }
     }
     # $prefix_fieldsetloop