diff options
| author | ivan <ivan> | 2004-02-25 04:56:40 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2004-02-25 04:56:40 +0000 |
| commit | 0952f0a9264d575752393a0be1a3d3c6480f96ed (patch) | |
| tree | e30a7306f071dd982e9fbdf444c33e5e2b2dd4d1 /FS/FS/CGI.pm | |
| parent | e386fc15be6edadc7068dcb3e48fc81e37b3774b (diff) | |
query strings get passed through sometimes?
Diffstat (limited to 'FS/FS/CGI.pm')
| -rw-r--r-- | FS/FS/CGI.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/FS/FS/CGI.pm b/FS/FS/CGI.pm index f615376..86121f0 100644 --- a/FS/FS/CGI.pm +++ b/FS/FS/CGI.pm @@ -215,6 +215,7 @@ sub popurl { my($up)=@_; my $cgi = &FS::UID::cgi; my $url = new URI::URL ( $cgi->isa('Apache') ? $cgi->uri : $cgi->url ); + $url->query(''); my(@path)=$url->path_components; splice @path, 0-$up; $url->path_components(@path); |