From 7653f450b4365c217ee4aa71afbe13bc146f2096 Mon Sep 17 00:00:00 2001
From: Lucas Bartholemy <lbartholemy@webgui-svn>
Date: Sat, 13 May 2006 19:46:48 +0000
Subject: [PATCH] added check for fieldType

---
 lib/WebGUI/Form/FieldType.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lib/WebGUI/Form/FieldType.pm b/lib/WebGUI/Form/FieldType.pm
index 283f9da7d..b25f2432b 100644
--- a/lib/WebGUI/Form/FieldType.pm
+++ b/lib/WebGUI/Form/FieldType.pm
@@ -113,8 +113,10 @@ Returns either what's posted or if nothing comes back it returns "text".
 =cut
 
 sub getValueFromPost {
-        my $self = shift;
-        return $self->session->form->param($self->get("name")) || "text";
+	my $self = shift;
+	my $fieldType = $self->session->form->param($self->get("name"));
+	$fieldType =~ s/[^\w]//g;
+	return $fieldType || "text";
 }
 
 #-------------------------------------------------------------------