summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2002-09-13 14:10:51 +0000
committerFrancois Pons <fpons@mandriva.com>2002-09-13 14:10:51 +0000
commit9a4f293341d6421b11c4ed662938f884962bca6c (patch)
tree474938aebc8cf2bb7825e7e74fb308d463d146f3 /perl-install/install_any.pm
parent1a068334f51cbec44553fb385a8b4758d60d999f (diff)
downloaddrakx-9a4f293341d6421b11c4ed662938f884962bca6c.tar
drakx-9a4f293341d6421b11c4ed662938f884962bca6c.tar.gz
drakx-9a4f293341d6421b11c4ed662938f884962bca6c.tar.bz2
drakx-9a4f293341d6421b11c4ed662938f884962bca6c.tar.xz
drakx-9a4f293341d6421b11c4ed662938f884962bca6c.zip
allow live_update to have something configured correctly for urpmi media.
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm4
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)