From c7701570975feab6dd268802c6f552381d691529 Mon Sep 17 00:00:00 2001
From: Stefan Kangas <skangas@skangas.se>
Date: Mon, 21 Mar 2011 22:31:02 +0100
Subject: Updates

---
 fripost-newalias | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'fripost-newalias')

diff --git a/fripost-newalias b/fripost-newalias
index ecfa4bf..4592522 100755
--- a/fripost-newalias
+++ b/fripost-newalias
@@ -50,8 +50,8 @@ my $schema = Fripost::Schema->connect(
 # Get information
 my $goto = fix_username(shift @ARGV);
 my @addr = @ARGV;
-$goto //= prompt_username("Alias goto address: ");
-@addr || push @addr, prompt "Alias address: ";
+$goto //= prompt_email("Alias goto address: ", 'is_user');
+@addr || push @addr, prompt "Alias from address: ";
 
 # Show goto adress
 say "goto adress: $goto";
-- 
cgit v1.2.3