From f6f8a5e8586f9c54245d8342ba7751e38e3190ec Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Mon, 2 May 1988 12:35:39 +0000
Subject: [PATCH] fixed another typo

---
 lang/m2/libm2/Streams.mod | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lang/m2/libm2/Streams.mod b/lang/m2/libm2/Streams.mod
index 6e758c77f..bd1b6a9a0 100644
--- a/lang/m2/libm2/Streams.mod
+++ b/lang/m2/libm2/Streams.mod
@@ -150,7 +150,7 @@ IMPLEMENTATION MODULE Streams;
 		IF (cnt > 0) THEN
 			cnt1 := cnt;
 			cnt := 0;
-			IF Unix.write(fildes, ADR(buf), cnt) < 0 THEN END;
+			IF Unix.write(fildes, ADR(buf), cnt1) < 0 THEN END;
 		END;
 	END;
   END FlushStream;
-- 
2.34.1