--- loncom/interface/lonuserutils.pm 2017/08/11 20:14:44 1.190
+++ loncom/interface/lonuserutils.pm 2017/11/04 16:13:31 1.191
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Utility functions for managing LON-CAPA user accounts
#
-# $Id: lonuserutils.pm,v 1.190 2017/08/11 20:14:44 raeburn Exp $
+# $Id: lonuserutils.pm,v 1.191 2017/11/04 16:13:31 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -4183,7 +4183,9 @@ sub upfile_drop_add {
$r->print(''.&mt('Error').
&mt('Enrollment of users not permitted for specified default domain: [_1].',
&Apache::lonnet::domain($env{'form.defaultdomain'},'description')).'');
- $r->print(&Apache::loncommon::end_page());
+ if ($env{'form.fullup'} ne 'yes') {
+ $r->print('');
+ }
return;
}
}
@@ -4198,7 +4200,9 @@ sub upfile_drop_add {
$r->print(''.&mt('Error').
&mt('Addition of users not permitted for specified default domain: [_1].',
&Apache::lonnet::domain($env{'form.defaultdomain'},'description')).'');
- $r->print(&Apache::loncommon::end_page());
+ if ($env{'form.fullup'} ne 'yes') {
+ $r->print('');
+ }
return;
}
}
@@ -4212,7 +4216,9 @@ sub upfile_drop_add {
$r->print(''.&mt('Error').
&mt('Addition of users not permitted for specified default domain: [_1].',
&Apache::lonnet::domain($env{'form.defaultdomain'},'description')).'');
- $r->print(&Apache::loncommon::end_page());
+ if ($env{'form.fullup'} ne 'yes') {
+ $r->print('');
+ }
return;
}
}
@@ -4228,7 +4234,9 @@ sub upfile_drop_add {
if (! exists($home_servers{$desiredhost})) {
$r->print(''.&mt('Error').
&mt('Invalid home server specified').'');
- $r->print(&Apache::loncommon::end_page());
+ if ($env{'form.fullup'} ne 'yes') {
+ $r->print('');
+ }
return;
}
}