diff options
author | damien <damien@mandriva.com> | 2001-04-09 09:33:07 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2001-04-09 09:33:07 +0000 |
commit | 00acd7938b4d76d93a90aae1dfa0e670678ab8b1 (patch) | |
tree | d60c054822ae324ed3a9605fd76f346a06cc5c90 | |
parent | 77b361a3f30cc4fc88c9403c1372ada3e7391bd9 (diff) | |
download | drakx-00acd7938b4d76d93a90aae1dfa0e670678ab8b1.tar drakx-00acd7938b4d76d93a90aae1dfa0e670678ab8b1.tar.gz drakx-00acd7938b4d76d93a90aae1dfa0e670678ab8b1.tar.bz2 drakx-00acd7938b4d76d93a90aae1dfa0e670678ab8b1.tar.xz drakx-00acd7938b4d76d93a90aae1dfa0e670678ab8b1.zip |
install function now returns the return value of the system.
-rw-r--r-- | perl-install/standalone.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm index 382af1651..2b403d567 100644 --- a/perl-install/standalone.pm +++ b/perl-install/standalone.pm @@ -8,8 +8,9 @@ $ENV{SHARE_PATH} ||= "/usr/share"; sub pkgs_install { my ($in, @l) = @_; $in->suspend; - system('urpmi --auto --best-output ' . join(' ', @l)); + my $ret = system('urpmi --auto --best-output ' . join(' ', @l)); $in->resume; + $ret; } 1; |