oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI/Form/Email.pm
View file

@ -61,7 +61,7 @@ Returns a validated email address. If the result does not pass validation, it re
sub getValueFromPost {
my $self = shift;
my $value = $session{cgi}->param($self->{name});
my $value = $session{req}->param($self->{name});
if ($value =~ /^([A-Z0-9]+[._+-]?){1,}([A-Z0-9]+[_+-]?)+\@(([A-Z0-9]+[._-]?){1,}[A-Z0-9]+\.){1,}[A-Z]{2,4}$/i) {
return $value;
}