Fixed a problem where the anti-caching string was added to the URL prematurely.

This commit is contained in:
JT Smith 2002-06-05 05:09:21 +00:00
parent a465864449
commit b2ebf48300
2 changed files with 5 additions and 4 deletions

View file

@ -18,10 +18,10 @@ use WebGUI::URL;
sub process { sub process {
my ($output); my ($output);
$output = $_[0]; $output = $_[0];
$output =~ s/\^\\\;/WebGUI::URL::page()/ge; $output =~ s/\^\\\;/$session{page}{url}/g;
return $output; return $output;
} }
1; 1;

View file

@ -16,9 +16,10 @@ use WebGUI::URL;
#------------------------------------------------------------------- #-------------------------------------------------------------------
sub process { sub process {
my ($output); my ($output, $temp);
$output = $_[0]; $output = $_[0];
$output =~ s/\^\/\;/WebGUI::URL::gateway()/ge; $temp = $session{config}{scripturl}.'/';
$output =~ s/\^\/\;/$temp/g;
return $output; return $output;
} }