aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Kangas <skangas@skangas.se>2011-04-05 22:12:10 +0200
committerStefan Kangas <skangas@skangas.se>2011-04-05 22:12:10 +0200
commit205da09d85274f993fe7343b6517f96c2f2b78dc (patch)
tree7adb8d97ff9a92831159b973524704a8871f2650
parent5b378efb833e05912c94116fb18e2613755fde5c (diff)
Do not ask for real name when adding user
-rwxr-xr-xfripost-adduser4
1 files changed, 0 insertions, 4 deletions
diff --git a/fripost-adduser b/fripost-adduser
index b72ae30..db312a2 100755
--- a/fripost-adduser
+++ b/fripost-adduser
@@ -51,7 +51,6 @@ my $schema = Fripost::Schema->connect(
my $user;
{
my $username = prompt_email("New username: ", 'is_user');
- my $name = prompt "Full (real) name: ";
my $domain = (split /\@/, $username)[1];
my $maildir = "$domain/". (split /\@/, $username)[0] . "/Maildir/"; # trailing slash important
my $active = 1;
@@ -59,7 +58,6 @@ my $user;
$user = {
username => $username,
- name => $name,
domain => $domain,
maildir => $maildir,
active => $active,
@@ -67,7 +65,6 @@ my $user;
};
say "User name: $user->{username}";
- say "Real name: $user->{name}";
say "Password: (hidden)";
confirm_or_abort();
@@ -129,7 +126,6 @@ $msg->attr('content-type.charset' => 'utf-8');
$vars = {
user => $user->{username},
pass => $user->{password},
- real => $user->{name},
};
$tt->process('user_info.tt', $vars, \$data)