--- loncom/auth/lonroles.pm 2002/11/13 16:54:59 1.45 +++ loncom/auth/lonroles.pm 2002/11/25 16:05:56 1.46 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # User Roles Screen # -# $Id: lonroles.pm,v 1.45 2002/11/13 16:54:59 www Exp $ +# $Id: lonroles.pm,v 1.46 2002/11/25 16:05:56 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -242,6 +242,7 @@ ENDHEADER my $button = 1; if ($envkey=~/^user\.role\./) { my (undef,undef,$role,@pwhere)=split(/\./,$envkey); + next if (!defined($role) || $role eq ''); my $where=join('.',@pwhere); my $trolecode=$role.'.'.$where; my ($tstart,$tend)=split(/\./,$ENV{$envkey});