some more fixes to fixes

1988-02-19 16:52:54 +00:00
parent 168c9d602f
commit 7d12db71e3
3 changed files with 15 additions and 10 deletions
--- a/lang/m2/libm2/InOut.mod
+++ b/lang/m2/libm2/InOut.mod
@@ -132,7 +132,7 @@ IMPLEMENTATION MODULE InOut ;
 	j : CARDINAL;
  BEGIN
 	Done := TRUE;
-	IF Streams.isatty(Streams.InputStream) THEN
+	IF Streams.isatty(Streams.InputStream, result) THEN
 		XWriteString(prompt);
 	END;
 	XReadString(buf);