From 484969d5d26f742edc731a9d6a18f6890f135a2d Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Fri, 10 Feb 2006 21:39:27 +0000
Subject: [PATCH] fix 6.8-ish session code merged into 6.9

---
 lib/WebGUI/Form/Text.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/WebGUI/Form/Text.pm b/lib/WebGUI/Form/Text.pm
index 44cc9349f..aa7a9388b 100644
--- a/lib/WebGUI/Form/Text.pm
+++ b/lib/WebGUI/Form/Text.pm
@@ -92,7 +92,7 @@ Retrieves a value from a form GET or POST and returns it. If the value comes bac
 
 sub getValueFromPost {
 	my $self = shift;
-	my $formValue = $session{req}->param($self->{name});
+	my $formValue = $self->session->form->param($self->get("name")) if ($self->session->request);
 	if (defined $formValue) {
 		$formValue =~ tr/\r\n//d;
 		return $formValue;