--- loncom/interface/loncommon.pm 2017/03/21 23:13:17 1.1277
+++ 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.1277 2017/03/21 23:13:17 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) {
@@ -10120,6 +10121,7 @@ sub user_picker {
next if ($option eq 'alc');
next if (($option eq 'crs') && ($env{'form.form'} eq 'requestcrs'));
next if ($option eq 'crs' && !$env{'request.course.id'});
+ next if (($option eq 'instd') && ($noinstd));
if ($curr_selected{'srchin'} eq $option) {
$srchinsel .= '
';