[LON-CAPA-cvs] cvs: loncom(version_2_8_X) /interface lonuserutils.pm

[raeburn]

raeburn		Fri Dec 12 16:53:37 2008 EDT

  Modified files:              (Branch: version_2_8_X)
    /loncom/interface	lonuserutils.pm 
  Log:
  - Backport 1.77.
  
  
Index: loncom/interface/lonuserutils.pm
diff -u loncom/interface/lonuserutils.pm:1.73 loncom/interface/lonuserutils.pm:1.73.2.1
--- loncom/interface/lonuserutils.pm:1.73	Wed Oct 15 14:12:41 2008
+++ loncom/interface/lonuserutils.pm	Fri Dec 12 16:53:37 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Utility functions for managing LON-CAPA user accounts
 #
-# $Id: lonuserutils.pm,v 1.73 2008/10/15 14:12:41 bisitz Exp $
+# $Id: lonuserutils.pm,v 1.73.2.1 2008/12/12 16:53:37 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3637,14 +3637,13 @@
                     ne &LONCAPA::clean_username($entries{$fields{'username'}})) {
                     $r->print('<br />'.
       &mt('<b>[_1]</b>: Unacceptable username for user [_2] [_3] [_4] [_5]',
-          $entries{$fields{'username'}},$fname,$mname,$lname,$gen).
-                              '</b>');
+          $entries{$fields{'username'}},$fname,$mname,$lname,$gen));
                     next;
                 } else {
                     if ($entries{$fields{'domain'}} 
                         ne &LONCAPA::clean_domain($entries{$fields{'domain'}})) {
                         $r->print('<br />'. '<b>'.$entries{$fields{'domain'}}.
-                                  '</b>: '.&mt('Unacceptable domain for user [_2] [_3] [_4] [_5]',$fname,$mname,$lname,$gen).'</b>');
+                                  '</b>: '.&mt('Unacceptable domain for user [_2] [_3] [_4] [_5]',$fname,$mname,$lname,$gen));
                         next;
                     }
                     my $username = $entries{$fields{'username'}};