diff --git a/lib/WebGUI/Session.pm b/lib/WebGUI/Session.pm
index 6d93379d9..7716a8503 100644
--- a/lib/WebGUI/Session.pm
+++ b/lib/WebGUI/Session.pm
@@ -200,7 +200,7 @@ sub env {
 
 =head2 errorHandler ( )
 
-Returns a WebGUI::ErrorHandler object.
+Returns a WebGUI::Session::ErrorHandler object.
 
 =cut
 
@@ -214,6 +214,22 @@ sub errorHandler {
 
 #-------------------------------------------------------------------
 
+=head2 form ( )
+
+Returns a WebGUI::Session::Form object.
+
+=cut
+
+sub form {
+	my $self = shift;
+	unless (exists $self->{_form}) {
+		$self->{_form} = WebGUI::Session::Form->new($self);
+	}
+	return $self->{_form};
+}
+
+#-------------------------------------------------------------------
+
 =head2 getId ( )
 
 Returns the current session Id.