Also send default values to output.

This commit is contained in:
ian%hixie.ch 2001-11-08 17:27:07 +00:00
Родитель e4827e8055
Коммит 1b1a10e431
1 изменённых файлов: 1 добавлений и 1 удалений

Просмотреть файл

@ -93,7 +93,7 @@ sub createArgument {
$self->SUPER::createArgument(@_);
} else {
$self->warn(5, "going to request '$argument' from user!");
$self->app->output->request($argument);
$self->app->output->request(@_);
# get input from user
my $term = Term::ReadLine->new($self->app->name);
my $value = $term->readline(''); # (the parameter passed is the prompt, if any)