diff options
author | Francois Pons <fpons@mandriva.com> | 2001-08-24 14:21:18 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2001-08-24 14:21:18 +0000 |
commit | 58681e096fbd65853507002f934c6fce8456f614 (patch) | |
tree | 2985687c2b281cd8291a08cf59bf34b42c70c538 /perl-install | |
parent | 978622f535cf4668cdbda1ffb64606c1a5b6b215 (diff) | |
download | drakx-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.pm | 2 |
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 { |