Plack::Request->path_info includes the query string! Argh.

plainblack · Mar 12, 2012 · 5ad34a9 · 5ad34a9
1 parent 2fd4f74
commit 5ad34a9
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/lib/WebGUI/Session/Url.pm b/lib/WebGUI/Session/Url.pm
@@ -324,7 +324,9 @@ Returns the URL of the page requested (no gateway, no query params, just the pag
 sub getRequestedUrl {
 	my $self = shift;
 	unless ($self->{_requestedUrl}) {
-		$self->{_requestedUrl} = decode_utf8($self->session->request->path_info);
+        my $path_info = $self->session->request->path_info;
+        $path_info =~ s/\?.*//;
+        $self->{_requestedUrl} = decode_utf8($path_info);
 	}
 	return $self->{_requestedUrl};
 }