[LON-CAPA-cvs] cvs: loncom / lcuseradd

albertel lon-capa-cvs@mail.lon-capa.org
Thu, 02 Sep 2004 19:04:01 -0000


albertel		Thu Sep  2 15:04:01 2004 EDT

  Modified files:              
    /loncom	lcuseradd 
  Log:
  - remove debug message
  
  
Index: loncom/lcuseradd
diff -u loncom/lcuseradd:1.29 loncom/lcuseradd:1.30
--- loncom/lcuseradd:1.29	Thu Sep  2 14:59:24 2004
+++ loncom/lcuseradd	Thu Sep  2 15:04:00 2004
@@ -6,7 +6,7 @@
 #             with adding a user with filesystem privileges (e.g. author)
 #
 #
-# $Id: lcuseradd,v 1.29 2004/09/02 18:59:24 albertel Exp $
+# $Id: lcuseradd,v 1.30 2004/09/02 19:04:00 albertel Exp $
 ###
 
 ###############################################################################
@@ -247,7 +247,6 @@
 print "Done adding user\n" unless $noprint;
 # Make www a member of that user group.
 my $groups=`/usr/bin/groups www` or &Exit(6);
-print "groups $groups\n";
 # untaint
 my ($safegroups)=($groups=~/:\s*([\s\w]+)/);
 $groups=$safegroups;