[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