diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_any.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 72e321b63..aea1063b7 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -594,7 +594,9 @@ sub install_urpmi { disk => "file:/" . hdInstallPath(), ftp => $ENV{URLPREFIX}, http => $ENV{URLPREFIX}, - cdrom => "removable://mnt/cdrom" }}{$method}) . "/$_->{rpmsdir}"; + cdrom => "removable://mnt/cdrom" }}{$method} || + #- for live_update or live_install script. + readlink "/tmp/image/Mandrake" =~ m,^(\/.*)\/Mandrake\/*$, && "removable:/$1") . "/$_->{rpmsdir}"; #- build list file using internal data, synthesis file should exists. #- WARNING this method of build only works because synthesis (or hdlist) |