From f9869a23b2fcc34ec001b388fe9c5e9e4dba4ab2 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Thu, 27 Mar 2003 03:10:32 +0000
Subject: [PATCH] fixed a typo

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

diff --git a/lib/WebGUI/Form.pm b/lib/WebGUI/Form.pm
index ae9dd0f0e..e3f28ef69 100644
--- a/lib/WebGUI/Form.pm
+++ b/lib/WebGUI/Form.pm
@@ -1127,7 +1127,7 @@ sub radioList {
         my ($output, $key, $checked);
         foreach $key (keys %{$_[0]->{options}}) {
 		$checked = 0;
-                $checked = 1 if ($key $_[0]->{value});
+                $checked = 1 if ($key eq $_[0]->{value});
 		$output .= radio({
 			name=>$_[0]->{name},
 			value=>$key,