aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Fripost
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Fripost')
-rwxr-xr-xlib/Fripost/Prompt.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Fripost/Prompt.pm b/lib/Fripost/Prompt.pm
index b41f806..0a9d5c6 100755
--- a/lib/Fripost/Prompt.pm
+++ b/lib/Fripost/Prompt.pm
@@ -32,9 +32,9 @@ sub confirm_or_abort {
sub fix_username {
my ($nam) = @_;
- if ($nam !~ /\@/) {
+ if (defined $nam && $nam !~ /\@/) {
$nam .= '@fripost.org';
- say "Using username: $nam";
+ say "Using $nam";
}
return $nam;
}
@@ -47,7 +47,7 @@ sub prompt_email {
$email = prompt $msg;
if ($is_username) {
- $email = fix_username($email)
+ $email = fix_username($email);
}
if (!Email::Valid->address($email)) {