summaryrefslogtreecommitdiffstats
path: root/perl-install/run_program.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-04-11 01:03:13 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-04-11 01:03:13 +0000
commitfb94e65991297cc48ba2eaa1cb2f37846992df77 (patch)
tree6173dd3a1883851e3f4728d6baec7e98cfaa05c0 /perl-install/run_program.pm
parent3c3fa6b8bbe73214bb3a0ca5a22c012e663f3c49 (diff)
downloaddrakx-fb94e65991297cc48ba2eaa1cb2f37846992df77.tar
drakx-fb94e65991297cc48ba2eaa1cb2f37846992df77.tar.gz
drakx-fb94e65991297cc48ba2eaa1cb2f37846992df77.tar.bz2
drakx-fb94e65991297cc48ba2eaa1cb2f37846992df77.tar.xz
drakx-fb94e65991297cc48ba2eaa1cb2f37846992df77.zip
in install, call install_any::check_prog to allow shadow progs which are
fetched when needed via getFile
Diffstat (limited to 'perl-install/run_program.pm')
-rw-r--r--perl-install/run_program.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/run_program.pm b/perl-install/run_program.pm
index 8f2f18051..2eb9e8a6f 100644
--- a/perl-install/run_program.pm
+++ b/perl-install/run_program.pm
@@ -25,6 +25,7 @@ sub rooted {
return 1 if $root && $<;
$root ? $root .= '/' : ($root = '');
+ install_any::check_prog (ref $name ? $name->[0] : $name, $root) if $::isInstall;
if (my $pid = fork) {
waitpid $pid, 0;