replaced $session{cgi} with $session{req}

This commit is contained in:
Matthew Wilson 2005-11-03 21:48:37 +00:00
parent 1b0adbb416
commit c01d7e49d5
33 changed files with 76 additions and 66 deletions

View file

@ -61,7 +61,7 @@ Returns a string filtered to allow only digits, spaces, and these special charac
sub getValueFromPost {
my $self = shift;
my $value = $session{cgi}->param($self->{name});
my $value = $session{req}->param($self->{name});
if ($value =~ /^[\d\s\-\+\(\)]+$/) {
return $value;
}