--- loncom/interface/loncreateuser.pm 2008/07/07 23:33:49 1.249 +++ loncom/interface/loncreateuser.pm 2008/07/10 22:07:18 1.251 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.249 2008/07/07 23:33:49 raeburn Exp $ +# $Id: loncreateuser.pm,v 1.251 2008/07/10 22:07:18 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3130,12 +3130,12 @@ sub print_main_menu { help => 'Course_User_Logs', action => 'changelogs', permission => $permission->{'cusr'}, - }, - { text => 'View Log-in History', - help => 'Course_User_Logins', - action => 'logins', - permission => $permission->{'cusr'}, - }); + },); +# { text => 'View Log-in History', +# help => 'Course_User_Logins', +# action => 'logins', +# permission => $permission->{'cusr'}, +# }); push(@menu,@courselinks); } my $menu_html = ''; @@ -3538,7 +3538,7 @@ sub selfenroll_inst_types { 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) { + if (keys(%{$usertypes}) > 0) { $othervalue = 'other'; } $output .= '';