diff options
| author | Olivier Blin <oblin@mandriva.com> | 2009-01-26 14:33:46 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2009-01-26 14:33:46 +0000 |
| commit | 3a305ef3bb26c8162414b16392af61e17f01ded4 (patch) | |
| tree | 36c7f2da3a4460c5551cc100e903de0eb3cb973d /perl-install/standalone/drakdvb | |
| parent | c70a3954e166569811f7989f860b96845171ba20 (diff) | |
| download | drakx-backup-do-not-use-3a305ef3bb26c8162414b16392af61e17f01ded4.tar drakx-backup-do-not-use-3a305ef3bb26c8162414b16392af61e17f01ded4.tar.gz drakx-backup-do-not-use-3a305ef3bb26c8162414b16392af61e17f01ded4.tar.bz2 drakx-backup-do-not-use-3a305ef3bb26c8162414b16392af61e17f01ded4.tar.xz drakx-backup-do-not-use-3a305ef3bb26c8162414b16392af61e17f01ded4.zip | |
fix checking return code
Diffstat (limited to 'perl-install/standalone/drakdvb')
| -rwxr-xr-x | perl-install/standalone/drakdvb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/drakdvb b/perl-install/standalone/drakdvb index 033df401f..9938670b0 100755 --- a/perl-install/standalone/drakdvb +++ b/perl-install/standalone/drakdvb @@ -63,7 +63,7 @@ sub detect_channels { $SIG{CHLD} = 'IGNORE'; $_w->{window}->hide; waitpid($pid, 0); - if($?){ + if(($? >> 8) == 0){ load_channels(); } else { $in->ask_warn(N("Error"), N("Could not get the list of available channels")); @@ -84,9 +84,9 @@ sub detect_channels { } else { $SIG{CHLD} = 'DEFAULT'; mkdir_p(dirname($config_file)); - system("w_scan -X > $config_file"); + my $ret = system("w_scan -X > $config_file"); sleep(1); - POSIX::_exit($?); + POSIX::_exit($ret >> 8); } } |