Diff for /loncom/enrollment/localenroll.pm between versions 1.29 and 1.30

version 1.29, 2008/01/03 23:28:33 version 1.30, 2008/02/24 22:59:20
Line 648  sub username_rules { Line 648  sub username_rules {
 #  #
 # (c) $rulesorder - reference to array containing rule names  # (c) $rulesorder - reference to array containing rule names
 #                   in order to be displayed  #                   in order to be displayed
   
 #  #
 #  returns 'ok' if no processing error.  #  returns 'ok' if no processing error.
 #  #
Line 661  sub id_rules { Line 660  sub id_rules {
 }  }
   
 ###############################  ###############################
   # sub selfenroll_rules
   #
   # Incoming data: three arguments
   # (a) $dom - domain
   # (b) $ruleshash - reference to hash containing rules
   #                  (a hash of a hash)
   #                  keys of top level hash are short names
   #                   (e.g., netid)
   #                  for each key, value is a hash
   #                      desc => long name for rule
   #                      rule => description of rule
   #
   # (c) $rulesorder - reference to array containing rule names
   #                   in order to be displayed
   #
   #  returns 'ok' if no processing error.
   #
   ###############################
   
   
   sub selfenroll_rules {
       my ($dom,$ruleshash,$rulesorder) = @_;
       my $outcome;
       return $outcome;
   }
   
   ###############################
 # sub username_check   # sub username_check 
 #  #
 # Incoming data: four arguments  # Incoming data: four arguments
Line 703  sub id_check { Line 729  sub id_check {
     my $outcome;      my $outcome;
     return $outcome;      return $outcome;
 }  }
   
   ###############################
   # sub selfenroll_check
   #
   # Incoming data: four arguments
   # (a) $dom - domain (scalar)
   # (b) $selfenrollname - e-mail proposed as username (compare against rules - scalar)
   # (c) $to_check (reference to array of rule names to check)
   # (d) $resultshash (reference to hash of results)
   #                   hash of results for rule checked
   #                   - keys are rule names
   #                   - values are: 1 or 0 (for matched or unmatched)
   #
   # returns 'ok' if no processing error.
   #
   ###############################
   
   sub selfenroll_check {
       my ($dom,$selfenrollname,$to_check,$resultshash) = @_;
       my $outcome;
       return $outcome;
   }
   
 ###############################  ###############################
 # sub AUTOLOAD  # sub AUTOLOAD

Removed from v.1.29  
changed lines
  Added in v.1.30


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