Commit 700008b3 authored by Leigh Stoller's avatar Leigh Stoller

Add a noemail option (for portal).

parent f337b075
#!/usr/bin/perl -wT
#
# EMULAB-COPYRIGHT
# Copyright (c) 2000-2010 University of Utah and the Flux Group.
# Copyright (c) 2000-2011 University of Utah and the Flux Group.
# All rights reserved.
#
use English;
......@@ -31,7 +31,7 @@ sub usage()
print " -r Force a regenerate of initial key for user\n";
exit(-1);
}
my $optlist = "dkniwfu:rX:";
my $optlist = "dkniwfu:rX:s";
my $iskey = 0;
my $verify = 0;
my $initmode = 0;
......@@ -150,6 +150,9 @@ if (defined($options{"i"})) {
if (defined($options{"r"})) {
$force = 1;
}
if (defined($options{"s"})) {
$noemail = 1;
}
if (defined($options{"w"})) {
$genmode = 1;
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment