--- 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; } }