re-add compat pkgSrcRecords::File::MD5Hash

[apt.git] / dselect / setup

diff --git a/dselect/setup b/dselect/setup
index 8386d9000ccb8509b099c54d30c00c75808bf96f..8689d2388b0d2738cf683786e4a040f5395f70ef 100755 (executable)
--- a/dselect/setup
+++ b/dselect/setup
@@ -30,7 +30,7 @@ my $boldoff=`setterm -bold off`;
 
 my @known_types           = ('deb');
 my @known_access         = ('http', 'ftp', 'file');
 
 my @known_types           = ('deb');
 my @known_access         = ('http', 'ftp', 'file');

-my @typical_distributions = ('stable', 'unstable', 'frozen', 'non-US');
+my @typical_distributions = ('stable', 'unstable', 'testing', 'non-US');

 my @typical_components    = ('main', 'contrib', 'non-free');
 
 my %known_access           = map {($_,$_)} @known_access;
 my @typical_components    = ('main', 'contrib', 'non-free');
 
 my %known_access           = map {($_,$_)} @known_access;


@@ -269,7 +269,7 @@ sub main {
     print "-" x 72, "\n";
     &print_config('Config' => \@Oldconfig);
     print "-" x 72, "\n";
     print "-" x 72, "\n";
     &print_config('Config' => \@Oldconfig);
     print "-" x 72, "\n";

-    print "$boldon Do you wish to change (overwrite) it?[y/N]$boldoff ";
+    print "$boldon Do you wish to overwrite it? [y/N]$boldoff ";

     my $answer = <STDIN>;
     chomp ($answer);
     $answer =~ s/\s+/ /og;
     my $answer = <STDIN>;
     chomp ($answer);
     $answer =~ s/\s+/ /og;