diff options
author | Martin Whitaker <mageia@martin-whitaker.me.uk> | 2017-04-02 11:54:16 +0100 |
---|---|---|
committer | RĂ©mi Verschelde <rverschelde@gmail.com> | 2017-04-04 20:05:25 +0200 |
commit | 519c83885a19195f1f580dbcc154b6596f76ff5c (patch) | |
tree | d6053858dd1db95da0e159ae23c9164e3d5f6cf1 /perl-install | |
parent | 8c1b77dc5934c4ad1bf9aa8ed11758eef7290bc7 (diff) | |
download | drakx-519c83885a19195f1f580dbcc154b6596f76ff5c.tar drakx-519c83885a19195f1f580dbcc154b6596f76ff5c.tar.gz drakx-519c83885a19195f1f580dbcc154b6596f76ff5c.tar.bz2 drakx-519c83885a19195f1f580dbcc154b6596f76ff5c.tar.xz drakx-519c83885a19195f1f580dbcc154b6596f76ff5c.zip |
Clean up detection of Live install root in do_pkgs_standalone::install().
Now we have $::isLiveInstall, we can use it. Also use $::prefix
instead of hardcoding the path.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/do_pkgs.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/do_pkgs.pm b/perl-install/do_pkgs.pm index 44f2e3ada..4c40d460e 100644 --- a/perl-install/do_pkgs.pm +++ b/perl-install/do_pkgs.pm @@ -333,7 +333,7 @@ sub install { return 1; } - my @wrapper = is_mgalive() && -e '/mnt/install' ? qw(chroot /mnt/install) : (); + my @wrapper = $::isLiveInstall && $::prefix ? ('chroot', $::prefix) : (); my @options = ('--allow-medium-change', '--auto', '--no-verify-rpm', '--expect-install', @l); my $ret; if (check_for_xserver() && -x '/usr/bin/gurpmi') { |