Also send default values to output.

git-svn-id: svn://10.0.0.236/trunk@107679 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
ian%hixie.ch 2001-11-08 17:27:07 +00:00
parent 738e081f7c
commit 0e1edf614f

View File

@ -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)