diff options
Diffstat (limited to 'lib/CPAN/FirstTime.pm')
| -rw-r--r-- | lib/CPAN/FirstTime.pm | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lib/CPAN/FirstTime.pm b/lib/CPAN/FirstTime.pm index c996a1cfbb..8ac180dc71 100644 --- a/lib/CPAN/FirstTime.pm +++ b/lib/CPAN/FirstTime.pm @@ -15,7 +15,7 @@ use ExtUtils::MakeMaker qw(prompt); use FileHandle (); use File::Path (); use vars qw($VERSION); -$VERSION = substr q$Revision: 1.16 $, 10; +$VERSION = substr q$Revision: 1.18 $, 10; =head1 NAME @@ -128,7 +128,7 @@ those. my(@path) = split($Config{path_sep},$ENV{PATH}); my $prog; - for $prog (qw/gzip tar unzip make lynx ftp/){ + for $prog (qw/gzip tar unzip make lynx ncftp ftp/){ my $path = $CPAN::Config->{$prog} || find_exe($prog,[@path]) || $prog; $ans = prompt("Where is your $prog program?",$path) || $path; $CPAN::Config->{$prog} = $ans; @@ -178,7 +178,8 @@ without caring about them. As sometimes the Makefile.PL contains question you\'re expected to answer, you can set a timer that will kill a 'perl Makefile.PL' process after the specified time in seconds. -If you set this value to 0, these processes will wait forever. +If you set this value to 0, these processes will wait forever. This is +the default and recommended setting. }; @@ -257,8 +258,9 @@ the \$CPAN::Config takes precedence. $CPAN::Config->{$_} = prompt("Your $_?",$default); } - # We don't ask that now, it will be noticed in time.... + # We don't ask that now, it will be noticed in time, won't it? $CPAN::Config->{'inhibit_startup_message'} = 0; + $CPAN::Config->{'getcwd'} = 'cwd'; print "\n\n"; CPAN::Config->commit($configpm); |