[LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm
raeburn
raeburn at source.lon-capa.org
Tue Sep 27 17:47:48 EDT 2016
raeburn Tue Sep 27 21:47:48 2016 EDT
Modified files:
/loncom/interface loncreateuser.pm
Log:
- Append any additional warnings to the existing warning.
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.412 loncom/interface/loncreateuser.pm:1.413
--- loncom/interface/loncreateuser.pm:1.412 Mon Sep 5 01:46:07 2016
+++ loncom/interface/loncreateuser.pm Tue Sep 27 21:47:48 2016
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Create a user
#
-# $Id: loncreateuser.pm,v 1.412 2016/09/05 01:46:07 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.413 2016/09/27 21:47:48 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -6838,15 +6838,15 @@
}
}
if ($response ne '') {
- $response = '<span class="LC_warning">'.$response.'</span>';
+ $response = '<span class="LC_warning">'.$response.'</span><br />';
}
if ($srch->{'srchin'} eq 'instd') {
my $instd_chk = &instdirectorysrch_check($srch);
if ($instd_chk ne 'ok') {
my $domd_chk = &domdirectorysrch_check($srch);
- $response = '<span class="LC_warning">'.$instd_chk.'</span><br />';
+ $response .= '<span class="LC_warning">'.$instd_chk.'</span><br />';
if ($domd_chk eq 'ok') {
- $response = &mt('You may want to search in the LON-CAPA domain instead of the institutional directory.');
+ $response .= &mt('You may want to search in the LON-CAPA domain instead of the institutional directory.');
}
$response .= '<br /><br />';
}
@@ -6855,9 +6855,9 @@
my $domd_chk = &domdirectorysrch_check($srch);
if ($domd_chk ne 'ok') {
my $instd_chk = &instdirectorysrch_check($srch);
- $response = '<span class="LC_warning">'.$domd_chk.'</span><br />';
+ $response .= '<span class="LC_warning">'.$domd_chk.'</span><br />';
if ($instd_chk eq 'ok') {
- $response = &mt('You may want to search in the institutional directory instead of the LON-CAPA domain.');
+ $response .= &mt('You may want to search in the institutional directory instead of the LON-CAPA domain.');
}
$response .= '<br /><br />';
}
More information about the LON-CAPA-cvs
mailing list