--- loncom/interface/loncommon.pm 2017/02/25 19:50:16 1.1275 +++ loncom/interface/loncommon.pm 2017/03/21 23:19:29 1.1278 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.1275 2017/02/25 19:50:16 raeburn Exp $ +# $Id: loncommon.pm,v 1.1278 2017/03/21 23:19:29 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -5075,7 +5075,7 @@ sub blockcheck { $tdom,$spec,$trest,$area); } } - my ($author,$adv) = &Apache::lonnet::set_userprivs(\%userroles,\%allroles); + my ($author,$adv,$rar) = &Apache::lonnet::set_userprivs(\%userroles,\%allroles); if ($userroles{'user.priv.'.$checkrole} =~ /evb\&([^\:]*)/) { if ($1) { $no_userblock = 1; @@ -8357,6 +8357,7 @@ OFFLOAD '; } + $result .= ''."\n"; return $result.''; } @@ -10102,10 +10103,12 @@ sub user_picker { &html_escape(\%html_lt); &js_escape(\%js_lt); my $domform; + my $allow_blank = 1; if ($fixeddom) { - $domform = &select_dom_form($currdom,'srchdomain',1,1,undef,[$currdom]); + $allow_blank = 0; + $domform = &select_dom_form($currdom,'srchdomain',$allow_blank,1,undef,[$currdom]); } else { - $domform = &select_dom_form($currdom,'srchdomain',1,1); + $domform = &select_dom_form($currdom,'srchdomain',$allow_blank,1); } my $srchinsel = '