From e00bca524956e7850d759f919aad47ccb854baec Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sgunderson@bigfoot.com>
Date: Wed, 13 Nov 2013 23:50:39 +0100
Subject: [PATCH] Fix a minor bug in read_line().

---
 remoteglot.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/remoteglot.pl b/remoteglot.pl
index baed79a..3ec241b 100755
--- a/remoteglot.pl
+++ b/remoteglot.pl
@@ -1089,7 +1089,7 @@ sub read_line {
 	my $line = '';
 	while ($line !~ /\n/) {
 		my $tmp;
-		my $ret = sysread $engine->{'read'}, $tmp, 1;
+		my $ret = sysread $fh, $tmp, 1;
 
 		if (!defined($ret)) {
 			next if ($!{EINTR});
-- 
2.39.2