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 {
my ($output);
$output = $_[0];
$output =~ s/\^\\\;/WebGUI::URL::page()/ge;
$output =~ s/\^\\\;/$session{page}{url}/g;
return $output;
}
1;

View file

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