--- modules/gci/localenroll.pm 2010/11/16 03:12:39 1.1 +++ modules/gci/localenroll.pm 2010/12/06 03:16:27 1.2 @@ -1,6 +1,6 @@ # functions to glue school database system into Lon-CAPA for # automated enrollment -# $Id: localenroll.pm,v 1.1 2010/11/16 03:12:39 gci Exp $ +# $Id: localenroll.pm,v 1.2 2010/12/06 03:16:27 gci Exp $ # # Copyright Michigan State University Board of Trustees # @@ -829,7 +829,7 @@ sub get_userinfo { sub inst_usertypes { my ($dom,$usertypes,$order) = @_; - if ($dom eq 'gci') { + if ($dom =~ /^\w+ci$/) { %{$usertypes} = ( Faculty => 'Faculty', Postdoc => 'Postdoctoral Researcher', @@ -837,7 +837,7 @@ sub inst_usertypes { Undergraduate => 'Undergraduate', ); @{$order}=('Faculty','Postdoc','Graduate','Undergraduate'); - } elsif ($dom eq 'gcitest') { + } elsif ($dom =~ /^\w+citest$/) { %{$usertypes} = ( Student => 'Student', );