diff --git a/docs/migration.txt b/docs/migration.txt
index 575008fe0..1cf89f35a 100644
--- a/docs/migration.txt
+++ b/docs/migration.txt
@@ -424,6 +424,11 @@ $f->text({-name=>"nameGoesHere"});
 $f->text(name=>"nameGoesHere");
 $f->text({name=>"nameGoesHere"});
 
+Also every form control now has an auto-generated ID attribute to aid in the
+swift development of AJAX features. You can override the autogenerated one by
+passing in an id parameter like this:
+
+$f->text(name=>"this",id==>"myownpersonalid");
+
 See WebGUI::HTMLForm and WebGUI::Form::Control for additional information.
 
-
diff --git a/lib/WebGUI/Asset.pm b/lib/WebGUI/Asset.pm
index f0282ccab..bace93ff7 100644
--- a/lib/WebGUI/Asset.pm
+++ b/lib/WebGUI/Asset.pm
@@ -2979,7 +2979,8 @@ sub www_editTree {
 		-subtext=>'<br />'.WebGUI::International::get("change","Asset").' '.WebGUI::Form::yesNo({name=>"change_url"}),
 		-value=>WebGUI::Form::selectList({
                 	name=>"baseUrlBy",
-			extras=>'id="baseUrlBy" onchange="toggleSpecificBaseUrl()"',
+			extras=>'onchange="toggleSpecificBaseUrl()"',
+			id=>"baseUrlBy",
 			options=>{
 				parentUrl=>"Parent URL",
 				specifiedBase=>"Specified Base",
diff --git a/lib/WebGUI/Asset/Wobject/Navigation.pm b/lib/WebGUI/Asset/Wobject/Navigation.pm
index 7a69225f8..54a967a24 100644
--- a/lib/WebGUI/Asset/Wobject/Navigation.pm
+++ b/lib/WebGUI/Asset/Wobject/Navigation.pm
@@ -120,7 +120,8 @@ sub getEditForm {
 		-value=>[$self->getValue("startType")],
 		-label=>$i18n->get("Start Point Type"),
 		-hoverHelp=>$i18n->get("Start Point Type description"),
-		-extras=>'id="navStartType" onChange="changeStartPoint()"'
+		-id=>"navStartType",
+		-extras=>'onchange="changeStartPoint()"'
 		);
 	$tabform->getTab("properties")->readOnly(
 		-label=>$i18n->get("Start Point"),
diff --git a/lib/WebGUI/Form/Control.pm b/lib/WebGUI/Form/Control.pm
index 3fa1ac7c7..79a6f5759 100644
--- a/lib/WebGUI/Form/Control.pm
+++ b/lib/WebGUI/Form/Control.pm
@@ -89,6 +89,10 @@ Add extra attributes to the form tag like
 
 A text label that will be displayed if toHtmlWithWrapper() is called.
 
+=head4 id
+
+A unique identifier that can be used to identify this field with javascripts and cascading style sheets. Is autogenerated if not specified. The autogenerated version is the value of the name parameter concatinated with the string "_formId". So for a field called "title" it would be "title_formId".
+
 =head4 uiLevel
 
 The UI Level that the user must meet or exceed if this field should be displayed with toHtmlWithWrapper() is called.
@@ -159,6 +163,9 @@ sub definition {
 			defaultValue=>undef
 			},
 		subtext=>{
+			defaultValue=>undef
+			},
+		id=>{
 			defaultValue=>undef
 			}
 		});
@@ -167,6 +174,24 @@ sub definition {
 
 #-------------------------------------------------------------------
 
+=head2 generateIdParameter ( name )
+
+A class method that returns a value to be used as the autogenerated ID for this field instance. Unless overriden, it simply returns the name with "_formId" appended to it.
+
+=head3 name
+
+The name of the field.
+
+=cut
+
+sub generateIdParameter {
+	my $class = shift;
+	my $name = shift;
+	return $name."_formId"; 
+}
+
+#-------------------------------------------------------------------
+
 =head2 getName ( )
 
 Returns a human readable name for this form control type. You MUST override this method with your own when creating new form controls.
@@ -323,6 +348,10 @@ sub new {
 	unless (exists $params{value}) {
 		$params{value} = $params{defaultValue};
 	}
+	# doesn't have an id specified, so let's give it one
+	unless ($params{id}) {
+		$params{id} = $class->generateIdParameter($params{name});
+	}
 	bless \%params, $class;
 }
 
diff --git a/lib/WebGUI/Form/HTMLArea.pm b/lib/WebGUI/Form/HTMLArea.pm
index f7c3deafc..0f435c16f 100644
--- a/lib/WebGUI/Form/HTMLArea.pm
+++ b/lib/WebGUI/Form/HTMLArea.pm
@@ -122,8 +122,8 @@ Renders an HTML area field.
 sub toHtml {
 	my $self = shift;
         WebGUI::Style::setScript($session{config}{extrasURL}.'/textFix.js',{ type=>'text/javascript' });
-	$self->{extras} .= ' id="'.$self->{name}.'" onBlur="fixChars(this.form.'.$self->{name}.')" mce_editable="true" ';	
-	return $self->SUPER::toHtml.WebGUI::Asset::RichEdit->new($self->{richEditId})->getRichEditor($self->{name});
+	$self->{extras} .= ' onblur="fixChars(this.form.'.$self->{name}.')" mce_editable="true" ';	
+	return $self->SUPER::toHtml.WebGUI::Asset::RichEdit->new($self->{richEditId})->getRichEditor($self->{id});
 }
 
 
diff --git a/lib/WebGUI/Form/asset.pm b/lib/WebGUI/Form/asset.pm
index f5d747311..b0f87dcc4 100644
--- a/lib/WebGUI/Form/asset.pm
+++ b/lib/WebGUI/Form/asset.pm
@@ -109,17 +109,19 @@ sub toHtml {
         my $asset = WebGUI::Asset->newByDynamicClass($self->{value}) || WebGUI::Asset->getRoot;
         return WebGUI::Form::hidden->new(
                         name=>$self->{name},
-                        extras=>'id="'.$self->{name}.'" '.$self->{extras},
-                        value=>$asset->getId
+                        extras=>$self->{extras},
+                        value=>$asset->getId,
+			id=>$self->{id}
                         )->toHtml
                 .WebGUI::Form::text->new(
                         name=>$self->{name}."_display",
-                        extras=>'id="'.$self->{name}."_display".'" readonly="1"',
-                        value=>$asset->get("title")
+                        extras=>' readonly="1" ',
+                        value=>$asset->get("title"),
+			id=>$self->{id}."_display"
                         )->toHtml
                 .WebGUI::Form::button->new(
                         value=>"...",
-                        extras=>'onclick="window.open(\''.$asset->getUrl("op=formAssetTree&classLimiter=".$self->{class}."&formId=".$self->{name}).'\',\'assetPicker\',\'toolbar=no, location=no, status=no, directories=no, width=400, height=400\');"'
+                        extras=>'onclick="window.open(\''.$asset->getUrl("op=formAssetTree&classLimiter=".$self->{class}."&formId=".$self->{id}).'\',\'assetPicker\',\'toolbar=no, location=no, status=no, directories=no, width=400, height=400\');"'
                         )->toHtml;
 }
 
diff --git a/lib/WebGUI/Form/button.pm b/lib/WebGUI/Form/button.pm
index db77eddd3..764558968 100644
--- a/lib/WebGUI/Form/button.pm
+++ b/lib/WebGUI/Form/button.pm
@@ -89,7 +89,7 @@ Renders a button.
 sub toHtml {
 	my $self = shift;
  	my $value = $self->fixQuotes($self->{value});
-        return '<input type="button" name="'.$self->{name}.'" value="'.$value.'" '.$self->{extras}.' />';
+        return '<input type="button" name="'.$self->{name}.'" value="'.$value.'" id="'.$self->{id}.'" '.$self->{extras}.' />';
 }
 
 1;
diff --git a/lib/WebGUI/Form/checkbox.pm b/lib/WebGUI/Form/checkbox.pm
index 87b66c86e..4dcd439f3 100644
--- a/lib/WebGUI/Form/checkbox.pm
+++ b/lib/WebGUI/Form/checkbox.pm
@@ -72,6 +72,18 @@ sub definition {
 }
 
 
+#-------------------------------------------------------------------
+
+=head2 generateIdParameter ( )
+
+A class method that returns a value to be used as the autogenerated ID for this field instance. Returns undef because this field type can have more than one with the same name, therefore autogenerated ID's aren't terribly useful.
+
+=cut
+
+sub generateIdParameter {
+	return undef
+}
+
 #-------------------------------------------------------------------
 
 =head2 getName ()
@@ -97,7 +109,8 @@ sub toHtml {
 	my $self = shift;
 	my $value = $self->fixMacros($self->fixQuotes($self->fixSpecialCharacters($self->{value})));
 	my $checkedText = ' checked="checked"' if ($self->{checked});
-	return '<input type="checkbox" name="'.$self->{name}.'" value="'.$value.'"'.$checkedText.' '.$self->{extras}.' />';
+	my $idText = ' id="'.$self->{id}.'" ' if ($self->{id});
+	return '<input type="checkbox" name="'.$self->{name}.'" value="'.$value.'"'.$idText.$checkedText.' '.$self->{extras}.' />';
 }
 
 
diff --git a/lib/WebGUI/Form/combo.pm b/lib/WebGUI/Form/combo.pm
index bce7c8a28..ab3be11f6 100644
--- a/lib/WebGUI/Form/combo.pm
+++ b/lib/WebGUI/Form/combo.pm
@@ -83,7 +83,8 @@ sub toHtml {
 	return $self->SUPER::toHtml
 		.WebGUI::Form::text->new(
 			size=>$session{setting}{textBoxSize}-5,
-			name=>$self->{name}."_new"
+			name=>$self->{name}."_new",
+			id=>$self->{id}."_new"
 			)->toHtml;
 }
 
diff --git a/lib/WebGUI/Form/contentType.pm b/lib/WebGUI/Form/contentType.pm
index b3fe50816..a2b611d60 100644
--- a/lib/WebGUI/Form/contentType.pm
+++ b/lib/WebGUI/Form/contentType.pm
@@ -130,6 +130,7 @@ sub toHtml {
         }
 	return WebGUI::Form::selectList->new(
 		options=>\%types,
+		id=>$self->{id},
 		name=>$self->{name},
 		value=>[$self->{value}],
 		extras=>$self->{extras},
diff --git a/lib/WebGUI/Form/databaseLink.pm b/lib/WebGUI/Form/databaseLink.pm
index be3674d83..e4ce907ee 100644
--- a/lib/WebGUI/Form/databaseLink.pm
+++ b/lib/WebGUI/Form/databaseLink.pm
@@ -120,6 +120,7 @@ Renders a database connection picker control.
 sub toHtml {
 	my $self = shift;
 	return WebGUI::Form::selectList->new(
+		id=>$self->{id},
 		name=>$self->{name},
 		options=>WebGUI::DatabaseLink::getList(),
 		value=>[$self->{value}],
diff --git a/lib/WebGUI/Form/date.pm b/lib/WebGUI/Form/date.pm
index e45a6fac5..8a0ceaf6e 100644
--- a/lib/WebGUI/Form/date.pm
+++ b/lib/WebGUI/Form/date.pm
@@ -133,11 +133,12 @@ sub toHtml {
                 name=>$self->{name},
                 value=>$value,
                 size=>$self->{size},
-                extras=>'id="'.$self->{name}.'Id" '.$self->{extras},
+                extras=>$self->{extras},
+		id=>$self->{id},
                 maxlength=>$self->{maxlength}
                 )->toHtml . '<script type="text/javascript"> 
                         Calendar.setup({ 
-                                inputField : "'.$self->{name}.'Id", 
+                                inputField : "'.$self->{id}.'", 
                                 ifFormat : "%Y-%m-%d", 
                                 showsTime : false, 
                                 timeFormat : "12",
diff --git a/lib/WebGUI/Form/dateTime.pm b/lib/WebGUI/Form/dateTime.pm
index 5c4a18e2a..521b985ff 100644
--- a/lib/WebGUI/Form/dateTime.pm
+++ b/lib/WebGUI/Form/dateTime.pm
@@ -126,11 +126,12 @@ sub toHtml {
                 name=>$self->{name},
                 value=>$value,
                 size=>$self->{size},
-                extras=>'id="'.$self->{name}.'Id" '.$self->{extras},
+                extras=>$self->{extras},
+		id=>$self->{id},
                 maxlength=>$self->{maxlength}
                 )->toHtml . '<script type="text/javascript"> 
                         Calendar.setup({ 
-                                inputField : "'.$self->{name}.'Id", 
+                                inputField : "'.$self->{name}.'", 
                                 ifFormat : "%Y-%m-%d %H:%M:%S", 
                                 showsTime : true, 
                                 timeFormat : "12",
diff --git a/lib/WebGUI/Form/email.pm b/lib/WebGUI/Form/email.pm
index b6898b276..de01de4ac 100644
--- a/lib/WebGUI/Form/email.pm
+++ b/lib/WebGUI/Form/email.pm
@@ -79,7 +79,7 @@ Renders an email address field.
 sub toHtml {
         my $self = shift;
 	WebGUI::Style::setScript($session{config}{extrasURL}.'/emailCheck.js',{ type=>'text/javascript' });
-	$self->{extras} .= ' onChange="emailCheck(this.value)" ';
+	$self->{extras} .= ' onchange="emailCheck(this.value)" ';
 	return $self->SUPER::toHtml;
 }
 
diff --git a/lib/WebGUI/Form/fieldType.pm b/lib/WebGUI/Form/fieldType.pm
index f208ee58a..8f1baeadc 100644
--- a/lib/WebGUI/Form/fieldType.pm
+++ b/lib/WebGUI/Form/fieldType.pm
@@ -149,6 +149,7 @@ sub toHtml {
 		$options{$type} = $class->getName;
 	}
 	return WebGUI::Form::selectList->new(
+		id=>$self->{id},
 		name=>$self->{name},
 		options=>\%options,
 		value=>[$self->{value}],
diff --git a/lib/WebGUI/Form/filterContent.pm b/lib/WebGUI/Form/filterContent.pm
index fc30d940f..d33becfe0 100644
--- a/lib/WebGUI/Form/filterContent.pm
+++ b/lib/WebGUI/Form/filterContent.pm
@@ -127,6 +127,7 @@ sub toHtml {
                 'all'=>WebGUI::International::get(419)
                 );
 	return WebGUI::Form::selectList->new(
+		id=>$self->{id},
 		options=>\%filter,
 		name=>$self->{name},
 		value=>[$self->{value}],
diff --git a/lib/WebGUI/Form/group.pm b/lib/WebGUI/Form/group.pm
index 2a8c5b526..1bc35d79e 100644
--- a/lib/WebGUI/Form/group.pm
+++ b/lib/WebGUI/Form/group.pm
@@ -145,6 +145,7 @@ sub toHtml {
 	return WebGUI::Form::selectList->new(
 		options=>WebGUI::SQL->buildHashRef("select groupId,groupName from groups where showInForms=1 $where order by groupName"),
 		name=>$self->{name},
+		id=>$self->{id},
 		value=>$self->{value},
 		extras=>$self->{extras},
 		size=>$self->{size},
diff --git a/lib/WebGUI/Form/hidden.pm b/lib/WebGUI/Form/hidden.pm
index 01f3f92a6..f077fff50 100644
--- a/lib/WebGUI/Form/hidden.pm
+++ b/lib/WebGUI/Form/hidden.pm
@@ -39,6 +39,18 @@ The following methods are specifically available from this class. Check the supe
 
 #-------------------------------------------------------------------
 
+=head2 generateIdParameter ( )
+
+A class method that returns a value to be used as the autogenerated ID for this field instance. Returns undef because this field type can have more than one with the same name, therefore autogenerated ID's aren't terribly useful.
+
+=cut
+
+sub generateIdParameter {
+	return undef
+}
+
+#-------------------------------------------------------------------
+
 =head2 getName ()
 
 Returns the human readable name or type of this form control.
@@ -74,7 +86,8 @@ Renders an input tag of type hidden.
 sub toHtmlAsHidden {
 	my $self = shift;
  	my $value = $self->fixMacros($self->fixQuotes($self->fixSpecialCharacters($self->{value})));
-	return '<input type="hidden" name="'.$self->{name}.'" value="'.$value.'" '.$self->{extras}.' />'."\n";
+	my $idText = ' id="'.$self->{id}.'" ' if ($self->{id});
+	return '<input type="hidden" name="'.$self->{name}.'" value="'.$value.'" '.$self->{extras}.$idText.' />'."\n";
 }
 
 #-------------------------------------------------------------------
diff --git a/lib/WebGUI/Form/interval.pm b/lib/WebGUI/Form/interval.pm
index 2e1786141..74de2f995 100644
--- a/lib/WebGUI/Form/interval.pm
+++ b/lib/WebGUI/Form/interval.pm
@@ -120,10 +120,12 @@ sub toHtml {
 		name=>$self->{name}."_interval",
 		value=>$interval,
 		extras=>$self->{extras}
+		id=>$self->{id}."_interval",
 		)->toHtml
 		.WebGUI::Form::selectList->new(
 		options=>\%units,
 		name=>$self->{name}."_units",
+		id=>$self->{id}."_units",
 		value=>[$self->{value}]
 		)->toHtml;
 }
diff --git a/lib/WebGUI/Form/ldapLink.pm b/lib/WebGUI/Form/ldapLink.pm
index 9f97bc4c3..832e2c69e 100644
--- a/lib/WebGUI/Form/ldapLink.pm
+++ b/lib/WebGUI/Form/ldapLink.pm
@@ -142,6 +142,7 @@ sub toHtml {
 	my $self = shift;
 	return WebGUI::Form::selectList->new(
 		name=>$self->{name},
+		id=>$self->{id},
 		options=>WebGUI::LDAPLink::getList(),
 		value=>$self->{value},
 		multiple=>$self->{multiple},
diff --git a/lib/WebGUI/Form/password.pm b/lib/WebGUI/Form/password.pm
index 1ee4ad04d..8d65aba8d 100644
--- a/lib/WebGUI/Form/password.pm
+++ b/lib/WebGUI/Form/password.pm
@@ -97,7 +97,7 @@ Renders an input tag of type password.
 sub toHtml {
 	my $self = shift;
         return '<input type="password" name="'.$self->{name}.'" value="'.$self->fixQuotes($self->{value}).'" size="'.
-                $self->{size}.'" maxlength="'.$self->{maxLength}.'" '.$self->{extras}.' />';
+                $self->{size}.'" id="'.$self->{id}.'" maxlength="'.$self->{maxLength}.'" '.$self->{extras}.' />';
 }
 
 
diff --git a/lib/WebGUI/Form/radio.pm b/lib/WebGUI/Form/radio.pm
index b63c50a12..5d3385e8a 100644
--- a/lib/WebGUI/Form/radio.pm
+++ b/lib/WebGUI/Form/radio.pm
@@ -65,6 +65,18 @@ sub definition {
 }
 
 
+#-------------------------------------------------------------------
+
+=head2 generateIdParameter ( )
+
+A class method that returns a value to be used as the autogenerated ID for this field instance. Returns undef because this field type can have more than one with the same name, therefore autogenerated ID's aren't terribly useful.
+
+=cut
+
+sub generateIdParameter {
+	return undef
+}
+
 #-------------------------------------------------------------------
 
 =head2 getName ()
@@ -90,7 +102,8 @@ sub toHtml {
 	my $self = shift;
 	my $value = $self->fixMacros($self->fixQuotes($self->fixSpecialCharacters($self->{value})));
 	my $checkedText = ' checked="checked"' if ($self->{checked});
-	return '<input type="radio" name="'.$self->{name}.'" value="'.$value.'"'.$checkedText.' '.$self->{extras}.' />';
+	my $idText = ' id="'.$self->{id}.'" ' if ($self->{id});
+	return '<input type="radio" name="'.$self->{name}.'" value="'.$value.'"'.$idText.$checkedText.' '.$self->{extras}.' />';
 }
 
 
diff --git a/lib/WebGUI/Form/selectList.pm b/lib/WebGUI/Form/selectList.pm
index 01c96a50b..7207e1070 100644
--- a/lib/WebGUI/Form/selectList.pm
+++ b/lib/WebGUI/Form/selectList.pm
@@ -132,7 +132,7 @@ Renders a select list form control.
 sub toHtml {
 	my $self = shift;
         my $multiple = ' multiple="1"' if ($self->{multiple});
-        my $output = '<select name="'.$self->{name}.'" size="'.$self->{size}.'" '.$self->{extras}.$multiple.'>';
+        my $output = '<select name="'.$self->{name}.'" size="'.$self->{size}.'" id="'.$self->{id}.'" '.$self->{extras}.$multiple.'>';
         my %options;
         tie %options, 'Tie::IxHash';
         if ($self->{sortByValue}) {
diff --git a/lib/WebGUI/Form/submit.pm b/lib/WebGUI/Form/submit.pm
index 79cc74628..3de102155 100644
--- a/lib/WebGUI/Form/submit.pm
+++ b/lib/WebGUI/Form/submit.pm
@@ -62,7 +62,7 @@ sub toHtml {
 	my $self = shift;
  	my $value = $self->fixQuotes($self->{value});
 	$self->{extras} ||= 'onclick="this.value=\''.WebGUI::International::get(452).'\'"';
-        return '<input type="submit" name="'.$self->{name}.'" value="'.$value.'" '.$self->{extras}.' />';
+        return '<input id="'.$self->{id}.'" type="submit" name="'.$self->{name}.'" value="'.$value.'" '.$self->{extras}.' />';
 }
 
 1;
diff --git a/lib/WebGUI/Form/template.pm b/lib/WebGUI/Form/template.pm
index 12a111c88..590f0bd03 100644
--- a/lib/WebGUI/Form/template.pm
+++ b/lib/WebGUI/Form/template.pm
@@ -113,6 +113,7 @@ sub toHtml {
           	}
         }
 	return WebGUI::Form::selectList->new(
+		id=>$self->{id},
 		name=>$self->{name},
 		options=>$templateList,
 		value=>[$self->{value}],
diff --git a/lib/WebGUI/Form/text.pm b/lib/WebGUI/Form/text.pm
index 5662660f9..a3de6135e 100644
--- a/lib/WebGUI/Form/text.pm
+++ b/lib/WebGUI/Form/text.pm
@@ -97,7 +97,7 @@ Renders an input tag of type text.
 sub toHtml {
 	my $self = shift;
  	my $value = $self->fixMacros($self->fixQuotes($self->fixSpecialCharacters($self->{value})));
-        return '<input type="text" name="'.$self->{name}.'" value="'.$value.'" size="'.$self->{size}.'" maxlength="'.$self->{maxlength}.'" '.$self->{extras}.' />';
+        return '<input id="'.$self->{id}.'" type="text" name="'.$self->{name}.'" value="'.$value.'" size="'.$self->{size}.'" maxlength="'.$self->{maxlength}.'" '.$self->{extras}.' />';
 }
 
 1;
diff --git a/lib/WebGUI/Form/textarea.pm b/lib/WebGUI/Form/textarea.pm
index a125b2c33..b0a46bdd7 100644
--- a/lib/WebGUI/Form/textarea.pm
+++ b/lib/WebGUI/Form/textarea.pm
@@ -106,7 +106,7 @@ Renders an input tag of type text.
 sub toHtml {
 	my $self = shift;
  	my $value = $self->fixMacros($self->fixTags($self->fixSpecialCharacters($self->{value})));
-	return '<textarea name="'.$self->{name}.'" cols="'.$self->{columns}.'" rows="'.$self->{rows}.'" wrap="'.
+	return '<textarea id="'.$self->{id}.'" name="'.$self->{name}.'" cols="'.$self->{columns}.'" rows="'.$self->{rows}.'" wrap="'.
                 $self->{wrap}.'" '.$self->{extras}.'>'.$value.'</textarea>';
 }
 
diff --git a/lib/WebGUI/Form/timeField.pm b/lib/WebGUI/Form/timeField.pm
index ec390e0fd..b4a12b565 100644
--- a/lib/WebGUI/Form/timeField.pm
+++ b/lib/WebGUI/Form/timeField.pm
@@ -117,6 +117,7 @@ sub toHtml {
 	$self->{extras} .= ' onkeyup="doInputCheck(this.form.'.$self->{name}.',\'0123456789:\')"';
 	return $self->SUPER::toHtml
 		.WebGUI::Form::button->new(
+			id=>$self->{id},
 			extras=>'style="font-size: 8pt;" onClick="window.timeField = this.form.'.$self->{name}.';clockSet = window.open(\''.$session{config}{extrasURL}. '/timeChooser.html\',\'timeChooser\',\'WIDTH=230,HEIGHT=100\');return false"',
 			value=>WebGUI::International::get(970)
 			)->toHtml;
diff --git a/lib/WebGUI/Form/whatNext.pm b/lib/WebGUI/Form/whatNext.pm
index 6b360667a..028d93159 100644
--- a/lib/WebGUI/Form/whatNext.pm
+++ b/lib/WebGUI/Form/whatNext.pm
@@ -107,6 +107,7 @@ Renders a question selector asking the user where they want to go.
 sub toHtml {
 	my $self = shift;
 	return WebGUI::Form::selectList->new(
+		id=>$self->{id},
 		name=>$self->{name},
 		options=>$self->{options},
 		value=>[$self->{value}],