Fix bugs

2 files changed, 2 insertions, 2 deletions

diff --git a/fripost-adduser b/fripost-adduser
index 50ac9e6..86da15d 100755
--- a/fripost-adduser
+++ b/fripost-adduser
@@ -104,7 +104,7 @@ my $msg = MIME::Lite->new(
 $msg->send();
 
 say "Sent welcome message: ";
-say $msg->as_text;
+say $msg->as_string;
 
 =head1 AUTHOR
 
diff --git a/fripost-newalias b/fripost-newalias
index 313691f..2668943 100755
--- a/fripost-newalias
+++ b/fripost-newalias
@@ -41,7 +41,7 @@ my $schema = Fripost::Schema->connect(
 my $goto = shift @ARGV;
 my @addr = @ARGV;
 
-$goto //= prompt_user("Alias goto address: ");
+$goto //= prompt_username("Alias goto address: ");
 
 @addr || push @addr, prompt "Alias address: ";