|
Lines 91-96
Link Here
|
| 91 |
ycp::Return(""); |
91 |
ycp::Return(""); |
| 92 |
} |
92 |
} |
| 93 |
|
93 |
|
|
|
94 |
my $exit = 0; |
| 95 |
|
| 96 |
sub ReadExitCode { |
| 97 |
$exit = $? >> 8; # high 8 bits are exit value |
| 98 |
} |
| 99 |
|
| 94 |
# install SIGCHLD handler |
100 |
# install SIGCHLD handler |
| 95 |
$SIG{CHLD} = \&Handler; |
101 |
$SIG{CHLD} = \&Handler; |
| 96 |
|
102 |
|
|
Lines 112-119
Link Here
|
| 112 |
my $pipe_defined = 0; |
118 |
my $pipe_defined = 0; |
| 113 |
my $pipe_defined_err = 0; |
119 |
my $pipe_defined_err = 0; |
| 114 |
|
120 |
|
| 115 |
my $exit = 0; |
|
|
| 116 |
|
| 117 |
$| = 1; |
121 |
$| = 1; |
| 118 |
|
122 |
|
| 119 |
# main loop |
123 |
# main loop |
|
Lines 235-240
Link Here
|
| 235 |
} |
239 |
} |
| 236 |
elsif ($path eq '.status') |
240 |
elsif ($path eq '.status') |
| 237 |
{ |
241 |
{ |
|
|
242 |
ReadExitCode(); |
| 238 |
ycp::Return($exit); |
243 |
ycp::Return($exit); |
| 239 |
} |
244 |
} |
| 240 |
elsif ($path eq '.newout') |
245 |
elsif ($path eq '.newout') |
|
Lines 368-374
Link Here
|
| 368 |
} |
373 |
} |
| 369 |
|
374 |
|
| 370 |
close(RD); |
375 |
close(RD); |
| 371 |
$exit = $? >> 8; # high 8 bits are exit value |
376 |
ReadExitCode(); |
| 372 |
} |
377 |
} |
| 373 |
else |
378 |
else |
| 374 |
{ |
379 |
{ |
|
Lines 417-423
Link Here
|
| 417 |
} |
422 |
} |
| 418 |
|
423 |
|
| 419 |
close(ERR); |
424 |
close(ERR); |
| 420 |
$exit = $? >> 8; # high 8 bits are exit value |
425 |
ReadExitCode(); |
| 421 |
} |
426 |
} |
| 422 |
else |
427 |
else |
| 423 |
{ |
428 |
{ |