--- a/terminals/extensions.st	Thu Feb 16 12:35:04 2012 +0000
+++ b/terminals/extensions.st	Thu Feb 16 18:11:55 2012 +0000
@@ -1,6 +1,4 @@
-"{ Package: 'stx:goodies/xtreams/terminals' }"
-
-!
+"{ Package: 'stx:goodies/xtreams/terminals' }"!
 
 !Block methodsFor:'converting'!
 
@@ -9,17 +7,20 @@
         self numArgs = 1 ifTrue: [^Xtreams::BlockClosureGenerateStream on: self].
         self error: 'More arguments than we can poke a stick at!!'
 ! !
+
 !Block methodsFor:'converting'!
 
 writing
         self numArgs = 1 ifTrue: [^Xtreams::BlockClosureWriteStream on: self].
         self error: 'Must be a single argument block.'
 ! !
+
 !Collection methodsFor:'converting'!
 
 writing
         ^Xtreams::CollectionWriteStream on: self
 ! !
+
 !Filename methodsFor:'converting'!
 
 appending
@@ -28,6 +29,7 @@
                 isPositionable: false;
                 yourself
 ! !
+
 !Filename methodsFor:'converting'!
 
 reading
@@ -39,29 +41,34 @@
                 do:     [:ex | ex return: #()])
                         reading collecting: [:each | self construct: each asFilename]
 ! !
+
 !Filename methodsFor:'converting'!
 
 writing
     ^(OperatingSystem open: self osNameForAccess attributes: #(O_WRONLY | O_CREAT) mode: nil) writing
 ! !
+
 !PipeStream methodsFor:'testing'!
 
 isActive
 
     ^self isOpen
 ! !
+
 !PipeStream methodsFor:'converting'!
 
 reading
 
     ^Xtreams::ExternalReadStream on: self
 ! !
+
 !PipeStream methodsFor:'converting'!
 
 writing
 
     ^Xtreams::ExternalWriteStream on: self
 ! !
+
 !Random methodsFor:'converting'!
 
 reading
@@ -69,26 +76,31 @@
 		contentsSpecies: self contentsSpecies;
 		yourself
 ! !
+
 !SequenceableCollection methodsFor:'converting'!
 
 reading
         ^Xtreams::SequenceableCollectionReadStream on: self
 ! !
+
 !SequenceableCollection methodsFor:'converting'!
 
 writing
         ^Xtreams::SequenceableCollectionWriteStream on: self
 ! !
+
 !SharedQueue methodsFor:'converting'!
 
 reading
         ^Xtreams::SharedQueueReadStream on: self
 ! !
+
 !SharedQueue methodsFor:'converting'!
 
 writing
         ^Xtreams::SharedQueueWriteStream on: self
 ! !
+
 !Socket methodsFor:'converting'!
 
 accepting
@@ -108,33 +120,49 @@
 		closeBlock: [self close];
 		yourself
 ! !
+
 !Socket methodsFor:'converting'!
 
 reading
         ^Xtreams::ExternalReadStream on: self
 ! !
+
 !Socket methodsFor:'converting'!
 
 writing
         ^Xtreams::ExternalWriteStream on: self
 ! !
+
 !TextCollector methodsFor:'converting'!
 
 writing
 	^[:object | self nextPut: object] writing
 ! !
+
 !UndefinedObject methodsFor:'converting'!
 
 writing
         ^Xtreams::NullWriteStream new
 ! !
+
 !Xtreams::Buffer methodsFor:'converting'!
 
 reading
-	^BufferReadStream on: self
+    ^Xtreams::BufferReadStream on: self
+
+    "Modified (format): / 16-02-2012 / 12:09:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
+
 !Xtreams::Buffer methodsFor:'converting'!
 
 writing
-	^BufferWriteStream on: self
+    ^Xtreams::BufferWriteStream on: self
+
+    "Modified: / 16-02-2012 / 12:09:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
+
+!stx_goodies_xtreams_terminals class methodsFor:'documentation'!
+
+extensionsVersion_SVN
+    ^ '$Id$'
+! !
\ No newline at end of file