WebGUI 2.5.0 release

This commit is contained in:
JT Smith 2001-12-09 22:10:00 +00:00
parent 6286f9bfaf
commit 00aec56a04
65 changed files with 3006 additions and 369 deletions

View file

@ -17,9 +17,7 @@ use WebGUI::Session;
sub process {
my ($output);
$output = $_[0];
while ($output =~ /\^c(.*?)\;/) {
$output =~ s/\^c(.*?)\;/$session{setting}{companyName}/;
}
$output =~ s/\^c\;/$session{setting}{companyName}/g;
#---everything below this line will go away in a later rev.
if ($output =~ /\^c/) {
$output =~ s/\^c/$session{setting}{companyName}/g;