Fix WebGUI::Session::Plack's param statement to be compatible with Apache2::Request's.

martink · martink · commit 1adfb3f11ae6 · 2012-08-24T11:35:15.000+02:00
diff --git a/lib/WebGUI/Session/Plack.pm b/lib/WebGUI/Session/Plack.pm
@@ -40,8 +40,16 @@ sub AUTOLOAD {
 
 # Emulate/delegate/fake Apache2::* subs
 sub uri         { shift->{request}->path_info }
-sub param       { shift->{request}->param(@_) }
-sub params      { shift->{request}->prameters->mixed(@_) }
+sub param       {
+    my $self = shift;
+    if (@_) {
+        return $self->{request}->param(@_);
+    }
+    else {
+        return $self->params;
+    }
+}
+sub params      { shift->{request}->parameters->mixed(@_) }
 sub headers_in  { shift->{request}->headers(@_) }
 sub headers_out { shift->{headers_out} }
 sub protocol    { shift->{request}->protocol(@_) }
