From 9a4f293341d6421b11c4ed662938f884962bca6c Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 13 Sep 2002 14:10:51 +0000 Subject: allow live_update to have something configured correctly for urpmi media. --- perl-install/install_any.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) 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) -- cgit v1.2.1