summaryrefslogtreecommitdiffstats
path: root/perl-install/crypto.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-02-27 10:16:01 +0000
committerFrancois Pons <fpons@mandriva.com>2003-02-27 10:16:01 +0000
commit4957f65d1a03e6b99af03f241024a794b8c237ae (patch)
tree26d574083b6cd14b27b4b59710ae9a0ea8c0d992 /perl-install/crypto.pm
parent161594e20a6ee7651747a8ac580fd32f231bbcf9 (diff)
downloaddrakx-backup-do-not-use-4957f65d1a03e6b99af03f241024a794b8c237ae.tar
drakx-backup-do-not-use-4957f65d1a03e6b99af03f241024a794b8c237ae.tar.gz
drakx-backup-do-not-use-4957f65d1a03e6b99af03f241024a794b8c237ae.tar.bz2
drakx-backup-do-not-use-4957f65d1a03e6b99af03f241024a794b8c237ae.tar.xz
drakx-backup-do-not-use-4957f65d1a03e6b99af03f241024a794b8c237ae.zip
change default version to 9.1
Diffstat (limited to 'perl-install/crypto.pm')
-rw-r--r--perl-install/crypto.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/crypto.pm b/perl-install/crypto.pm
index 4e4160b80..927a7de15 100644
--- a/perl-install/crypto.pm
+++ b/perl-install/crypto.pm
@@ -101,10 +101,10 @@ sub bestMirror {
sub version {
require pkgs;
my $pkg = pkgs::packageByName($::o->{packages}, 'mandrake-release');
- $pkg && $pkg->version || '9.0'; #- safe but dangerous ;-)
+ $pkg && $pkg->version || '9.1'; #- safe but dangerous ;-)
}
-sub dir { $mirrors{$_[0]}[1] . '/' . version() }
+sub dir { $mirrors{$_[0]}[1] . ($::corporate && '/corporate' || '') . '/' . version() }
sub ftp($) { ftp::new($_[0], dir($_[0])) }
sub getFile {