Changeset 20729

Timestamp:

2009-09-28T15:01:50+13:00 (15 years ago)

Author:

kjdon

Message:

uncommented alreadyencrypted option, as it appears to be implemented. added groups to the line in csv, ie now username,password,groups,comment.

File:

• gsdl/trunk/bin/script/csv-usernames-to-db.pl (modified) (3 diffs)

gsdl/trunk/bin/script/csv-usernames-to-db.pl

@@ -67 +67 @@
     'deft' => ",",
     'reqd' => "no" },
-# Not currently supported
-#      { 'name' => "alreadyencrypted",
-#   'desc' => "{cu2db.already-encrypted}",
-#   'type' => "flag",
-#   'reqd' => "no" },
+      { 'name' => "alreadyencrypted",
+    'desc' => "{cu2db.already-encrypted}",
+    'type' => "flag",
+    'reqd' => "no" },
       { 'name'  => "verbosity",
     'desc'  => "{scripts.verbosity}",
@@ -138 +137 @@
     while (defined ($line = <FIN>)) {
     chomp $line;
-    my ($username,$password,$comment) = split(/$fieldseparator/,$line);
+    my ($username,$password,$groups,$comment) = split(/$fieldseparator/,$line);
     
     if (!$alreadyencrypted) {
@@ -147 +146 @@
     print DBOUT "<comment>$comment\n";
     print DBOUT "<enabled>true\n";
-#       print DBOUT "<groups>administrator,all-collections-editor,colbuilder\n";
-    print DBOUT "<groups>dairywomen\n";
+    print DBOUT "<groups>$groups\n";
     print DBOUT "<password>$password\n";
     print DBOUT "<username>$username\n";