summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2001-09-05 10:05:33 +0000
committerFrancois Pons <fpons@mandriva.com>2001-09-05 10:05:33 +0000
commit50676c46842a31f58293e416665bc3f94ca84a53 (patch)
tree14417b8551602184082678507498aef810a0332d /perl-install
parent27779dd88a9699b98070fee12a355503bd95ade3 (diff)
downloaddrakx-backup-do-not-use-50676c46842a31f58293e416665bc3f94ca84a53.tar
drakx-backup-do-not-use-50676c46842a31f58293e416665bc3f94ca84a53.tar.gz
drakx-backup-do-not-use-50676c46842a31f58293e416665bc3f94ca84a53.tar.bz2
drakx-backup-do-not-use-50676c46842a31f58293e416665bc3f94ca84a53.tar.xz
drakx-backup-do-not-use-50676c46842a31f58293e416665bc3f94ca84a53.zip
allow installing urpmi on hd install even if low memory (so not using ramdisk).
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 3ad21d605..ea37a7123 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -503,7 +503,7 @@ sub setupFB {
sub hdInstallPath() {
my $tail = first(readlink("/tmp/image") =~ m|^/tmp/hdimage/(.*)|);
my $head = first(readlink("/tmp/hdimage") =~ m|$::o->{prefix}(.*)|);
- $head && $tail && "$head/$tail";
+ $tail && ($head ? "$head/$tail" : "/mnt/hd/$tail");
}
sub install_urpmi {