diff options
| -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 { |