Index: ossp-pkg/shiela/shiela.pl
RCS File: /v/ossp/cvs/ossp-pkg/shiela/shiela.pl,v
rcsdiff -q -kk '-r1.54' '-r1.55' -u '/v/ossp/cvs/ossp-pkg/shiela/shiela.pl,v' 2>/dev/null
--- shiela.pl	2004/05/07 06:27:07	1.54
+++ shiela.pl	2004/05/07 07:48:01	1.55
@@ -641,7 +641,7 @@
 sub recv {
     my $cvs = shift;
     if (wantarray) {
-         my @lines = $cvs->{rfd}->getlines;
+         my @lines = ($cvs->{rfd}->getlines || ());
          my @nlines = ();
          foreach my $line (@lines) {
              print STDERR "cvs server: <- $line" if ($cvs->{trace});
@@ -651,7 +651,7 @@
          return @nlines;
     }
     else {
-         my $line = $cvs->{rfd}->getline;
+         my $line = ($cvs->{rfd}->getline || "");
          print STDERR "cvs server: <- $line" if ($cvs->{trace});
          $line =~ s|\n$||;
          return $line;