--- a/FilteringStream.st Thu Mar 24 13:59:20 2016 +0100
+++ b/FilteringStream.st Fri Mar 25 16:44:11 2016 +0100
@@ -452,6 +452,8 @@
!
isWritable
+ "return true, if writing is supported by the receiver."
+
^ outputStream notNil and:[outputStream isWritable]
!