diff options
| author | Andreas König <a.koenig@mind.de> | 2000-08-23 01:31:33 +0200 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-23 13:53:53 +0000 |
| commit | 5e05dca5eeb6b4b7bde6dcfeb92fbbed8c17d405 (patch) | |
| tree | 361596878d5b193b8f17ed8cb8b26eebf1a24fab /lib/CPAN/FirstTime.pm | |
| parent | 24dc54436e0d0e809d0822fb86105bd72326c30a (diff) | |
| download | perl-5e05dca5eeb6b4b7bde6dcfeb92fbbed8c17d405.tar.gz | |
Storable support, v-version fixes.
Subject: CPAN.pm beta for testing available
Message-ID: <m3hf8dc79m.fsf@ak-71.mind.de>
p4raw-id: //depot/perl@6783
Diffstat (limited to 'lib/CPAN/FirstTime.pm')
| -rw-r--r-- | lib/CPAN/FirstTime.pm | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/lib/CPAN/FirstTime.pm b/lib/CPAN/FirstTime.pm index 9bd12f3ea2..cd2c49d8ee 100644 --- a/lib/CPAN/FirstTime.pm +++ b/lib/CPAN/FirstTime.pm @@ -16,7 +16,7 @@ use FileHandle (); use File::Basename (); use File::Path (); use vars qw($VERSION); -$VERSION = substr q$Revision: 1.40 $, 10; +$VERSION = substr q$Revision: 1.41 $, 10; =head1 NAME @@ -174,6 +174,20 @@ disable the cache scanning with 'never'. } while ($ans ne 'atstart' && $ans ne 'never'); $CPAN::Config->{scan_cache} = $ans; + print qq{ + +To speed up the initial CPAN shell startup, it is possible to use +Storable or FreezeThaw to create an cache of metadata. If no +serializer is avaiable, the normal index mechanism will be used. + +}; + + defined($default = $CPAN::Config->{cache_metadata}) or $default = 1; + do { + $ans = prompt("Cache metadata (yes/no)?", ($default ? 'yes' : 'no')); + } while ($ans !~ /^\s*[yn]/i); + $CPAN::Config->{cache_metadata} = ($ans =~ /^\s*y/i ? 1 : 0); + # # prerequisites_policy # Do we follow PREREQ_PM? |