changeset 19008 | e74b041ed377 |
parent 18956 | 9ef063595474 |
child 19009 | 0181a8078105 |
child 19072 | dd63f674181c |
--- a/ExternalStream.st Wed Dec 30 00:22:19 2015 +0100 +++ b/ExternalStream.st Wed Dec 30 00:22:49 2015 +0100 @@ -5455,9 +5455,9 @@ We know, that error conditions do not block, so return true for errors." ^ readAhead notNil - or:[handle isNil] + or:[handle isNil or:[mode == #writeonly - or:[OperatingSystem readCheck:self fileDescriptor]] + or:[OperatingSystem readCheck:self fileDescriptor]]] " |pipe|