Return to lonacc.pm CVS log | Up to [LON-CAPA] / loncom / auth |
version 1.101, 2006/09/19 20:36:27 | version 1.102, 2006/11/23 01:49:41 |
---|---|
Line 200 sub handler { | Line 200 sub handler { |
my $handle; | my $handle; |
if ($lonid) { | if ($lonid) { |
$handle=$lonid->value; | $handle=&LONCAPA::clean_handle($lonid->value); |
$handle=~s/\W//g; | |
} | } |
my $result = &sso_login($r,$lonid,$handle); | my $result = &sso_login($r,$lonid,$handle); |