--- loncom/interface/loncreateuser.pm 2008/07/02 16:08:21 1.246 +++ loncom/interface/loncreateuser.pm 2008/07/04 18:30:30 1.247 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.246 2008/07/02 16:08:21 bisitz Exp $ +# $Id: loncreateuser.pm,v 1.247 2008/07/04 18:30:30 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3360,7 +3360,11 @@ sub selfenroll_inst_types { my $numinrow = 4; my $count = 0; my ($othertitle,$usertypes,$types) = &Apache::loncommon::sorted_inst_types($currdom); + my $othervalue = 'any'; if ((ref($types) eq 'ARRAY') && (ref($usertypes) eq 'HASH')) { + if (@{$types} > 0) { + $othervalue = 'other'; + } $output .= ''; foreach my $type (@{$types}) { if (($count > 0) && ($count%$numinrow == 0)) { @@ -3383,7 +3387,7 @@ sub selfenroll_inst_types { if (($count > 0) && ($count%$numinrow == 0)) { $output .= ''; } - $output .= '