summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--source4/selftest/Subunit.pm31
1 files changed, 1 insertions, 30 deletions
diff --git a/source4/selftest/Subunit.pm b/source4/selftest/Subunit.pm
index 1c279437c8..e5c61ca9ba 100644
--- a/source4/selftest/Subunit.pm
+++ b/source4/selftest/Subunit.pm
@@ -15,36 +15,7 @@ sub parse_results($$$$$)
my $unexpected_err = 0;
my $orig_open_len = $#$open_tests;
- while(1) {
- my $line = "";
- my $subline = "";
- my $char = "";
- my $eof = 0;
- my $error = 0;
-
- while ($char ne "\n") {
- my $ret = sysread($fh, $char, 1);
- if (not defined($ret)) {
- $error = $!;
- last;
- }
- if ($ret == 0) {
- $eof = 1;
- last;
- }
-
- $line .= $char;
- $subline .= $char;
- if ($char eq "\r") {
- $msg_ops->output_msg($subline);
- $subline = "";
- }
- }
-
- last if ($eof or $error);
-
- $_ = $line;
-
+ while(<$fh>) {
if (/^test: (.+)\n/) {
$msg_ops->control_msg($_);
$msg_ops->start_test($open_tests, $1);