--- loncom/interface/loncommon.pm 2017/03/13 18:48:44 1.1276
+++ loncom/interface/loncommon.pm 2017/03/30 14:08:18 1.1279
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.1276 2017/03/13 18:48:44 raeburn Exp $
+# $Id: loncommon.pm,v 1.1279 2017/03/30 14:08:18 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -8357,6 +8357,7 @@ OFFLOAD
';
}
+ $result .= ''."\n";
return $result.'';
}
@@ -10037,7 +10038,7 @@ sub get_secgrprole_info {
}
sub user_picker {
- my ($dom,$srch,$forcenewuser,$caller,$cancreate,$usertype,$context,$fixeddom) = @_;
+ my ($dom,$srch,$forcenewuser,$caller,$cancreate,$usertype,$context,$fixeddom,$noinstd) = @_;
my $currdom = $dom;
my @alldoms = &Apache::lonnet::all_domains();
if (@alldoms == 1) {
@@ -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 = '