--- loncom/Attic/lcuseradd	2000/10/29 22:50:56	1.5
+++ loncom/Attic/lcuseradd	2000/10/29 22:52:30	1.6
@@ -88,7 +88,7 @@ $username=~/^(\w+)$/;
 my $safeusername=$1;
 
 if ($password1 ne $password2) {
-    print "Error. Password mismatch.\n";
+    print "Error. Password mismatch.\n" unless $noprint;
     unlink('/tmp/lock_lcpasswd');
     exit 7;
 }
@@ -99,12 +99,12 @@ if ($password1 ne $password2) {
 # a way that www is a member of the user-specific group
 
 if (system('/usr/sbin/useradd','-c','LON-CAPA user',$safeusername)) {
-    print "Error.  Something went wrong with the addition of user \"$safeusername\".\n";
+    print "Error.  Something went wrong with the addition of user \"$safeusername\".\n" unless $noprint;
     unlink('/tmp/lock_lcpasswd');
     exit 5;
 }
 if (system('/usr/sbin/usermod','-G',$safeusername,'www')) {
-    print "Error. Could not make www a member of the group \"$safeusername\".\n";
+    print "Error. Could not make www a member of the group \"$safeusername\".\n" unless $noprint;
     unlink('/tmp/lock_lcpasswd');
     exit 6;
 }