oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

some URL fixes and removing some uses of PseudoRequest

Browse source
This commit is contained in:
Graham Knop 2010-06-10 08:18:43 -05:00
parent 169218abf7
commit e063818e2d
5 changed files with 62 additions and 76 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/WebGUI/Session/Url.pm
View file

@ -196,11 +196,12 @@ sub make_urlmap_work {
if (! $self->session->request) {
return $url;
}
my $uri = $self->session->request->base;
if (URI->new($url, 'http')->host) {
return $url;
}
my $uri = $self->session->request->base;
$uri->path($uri->path . $url);
my $path = $uri->path;
$path =~ s{^//}{/};
return $path;
return $uri->path;
}
#-------------------------------------------------------------------