diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-01-07 22:37:21 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-01-07 22:37:21 +0000 |
| commit | 246b7e545d74ec577209f4e9d5ce8f0f5acfb7c2 (patch) | |
| tree | 8aeacd2771cd781a9b9a0f755040a4a756176848 /perl-install | |
| parent | 1938ec430bb1f2ef202133d12b6cfa45e4afa917 (diff) | |
| download | drakx-246b7e545d74ec577209f4e9d5ce8f0f5acfb7c2.tar drakx-246b7e545d74ec577209f4e9d5ce8f0f5acfb7c2.tar.gz drakx-246b7e545d74ec577209f4e9d5ce8f0f5acfb7c2.tar.bz2 drakx-246b7e545d74ec577209f4e9d5ce8f0f5acfb7c2.tar.xz drakx-246b7e545d74ec577209f4e9d5ce8f0f5acfb7c2.zip | |
when called from commands.pm, install_any is not loaded
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/run_program.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/run_program.pm b/perl-install/run_program.pm index d53c26007..c080be7d7 100644 --- a/perl-install/run_program.pm +++ b/perl-install/run_program.pm @@ -47,7 +47,10 @@ sub raw { return 1 if $root && $<; $root ? ($root .= '/') : ($root = ''); - install_any::check_prog(ref($name) ? $name->[0] : $name) if !$root && !$::isStandalone; + if (!$root && !$::isStandalone) { + require install_any; + install_any::check_prog(ref($name) ? $name->[0] : $name); + } my ($stdout_raw, $stdout_mode, $stderr_raw, $stderr_mode); |