Diff for /loncom/lond between versions 1.421 and 1.422

version 1.421, 2009/08/16 21:49:21 version 1.422, 2009/08/18 20:08:13
Line 4888  sub enrollment_enabled_handler { Line 4888  sub enrollment_enabled_handler {
 sub validate_instcode_handler {  sub validate_instcode_handler {
     my ($cmd, $tail, $client) = @_;      my ($cmd, $tail, $client) = @_;
     my $userinput = "$cmd:$tail";      my $userinput = "$cmd:$tail";
     my ($dom,$instcode,$owner) = split(/:/, $tail);      my ($dom,$instcode,$owner,$inststatus,$instseclist) = split(/:/, $tail);
     my $outcome=&localenroll::validate_instcode($dom,$instcode,$owner);      $instcode = &unescape($instcode);
       $owner = &unescape($owner);
       $inststatus = &unescape($inststatus);
       $instseclist = &unescape($instseclist);
       my $outcome=&localenroll::validate_instcode($dom,$instcode,$owner,
                                                   $inststatus,$instseclist);
     &Reply($client, \$outcome, $userinput);      &Reply($client, \$outcome, $userinput);
   
     return 1;      return 1;

Removed from v.1.421  
changed lines
  Added in v.1.422


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>