summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2001-08-24 14:21:18 +0000
committerFrancois Pons <fpons@mandriva.com>2001-08-24 14:21:18 +0000
commit58681e096fbd65853507002f934c6fce8456f614 (patch)
tree2985687c2b281cd8291a08cf59bf34b42c70c538 /perl-install
parent978622f535cf4668cdbda1ffb64606c1a5b6b215 (diff)
downloaddrakx-58681e096fbd65853507002f934c6fce8456f614.tar
drakx-58681e096fbd65853507002f934c6fce8456f614.tar.gz
drakx-58681e096fbd65853507002f934c6fce8456f614.tar.bz2
drakx-58681e096fbd65853507002f934c6fce8456f614.tar.xz
drakx-58681e096fbd65853507002f934c6fce8456f614.zip
fixed hdInstallPath for an hd installation without usingRamdisk (not installing
urpmi in such case).
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 cd4758f39..c07f4a9ca 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -498,7 +498,7 @@ sub setupFB {
sub hdInstallPath() {
my $tail = first(readlink("/tmp/image") =~ m|^/tmp/hdimage/(.*)|);
my $head = first(readlink("/tmp/hdimage") =~ m|$::o->{prefix}(.*)|);
- $tail && "$head/$tail";
+ $head && $tail && "$head/$tail";
}
sub install_urpmi {