From d3bfa909241e66cf4c658180836cb2eb2e695f53 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 25 Feb 2004 04:56:42 +0000
Subject: [PATCH] query strings get passed through sometimes?

---
 FS/FS/CGI.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/FS/FS/CGI.pm b/FS/FS/CGI.pm
index 86d20f6cb..f3c146a9c 100644
--- a/FS/FS/CGI.pm
+++ b/FS/FS/CGI.pm
@@ -210,6 +210,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);
-- 
2.20.1