Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
checkin from browser
authorClaus Gittinger <cg@exept.de>
Tue, 09 Jun 1998 14:06:26 +0200
changeset 3533 59e6bc687f1e
parent 3532 4b1a5cc57f8f
child 3534 126b23939933
checkin from browser
PipeStr.st file | annotate | diff | comparison | revisions
PipeStream.st file | annotate | diff | comparison | revisions 
--- a/PipeStr.st	Tue Jun 09 13:36:39 1998 +0200
+++ b/PipeStr.st	Tue Jun 09 14:06:26 1998 +0200
@@ -783,12 +783,6 @@
 
     "Modified: 28.1.1998 / 14:51:16 / md"
 !
-readingFrom:command inDirectory:aDirecrory
-    "setup the receiver to read from command"
-
-    mode := #readonly. didWrite := false.
-    ^ self openPipeFor:command withMode:'r' inDirectory:aDirecrory
-!
 
 readingFrom:command
     "setup the receiver to read from command"
@@ -797,6 +791,13 @@
     ^ self openPipeFor:command withMode:'r'
 !
 
+readingFrom:command inDirectory:aDirecrory
+    "setup the receiver to read from command"
+
+    mode := #readonly. didWrite := false.
+    ^ self openPipeFor:command withMode:'r' inDirectory:aDirecrory
+!
+
 writingTo:command
     "setup the receiver to write to command"
 
@@ -807,6 +808,6 @@
 !PipeStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/PipeStr.st,v 1.67 1998-02-21 16:39:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/PipeStr.st,v 1.68 1998-06-09 12:06:26 cg Exp $'
 ! !
 PipeStream initialize!
--- a/PipeStream.st	Tue Jun 09 13:36:39 1998 +0200
+++ b/PipeStream.st	Tue Jun 09 14:06:26 1998 +0200
@@ -783,12 +783,6 @@
 
     "Modified: 28.1.1998 / 14:51:16 / md"
 !
-readingFrom:command inDirectory:aDirecrory
-    "setup the receiver to read from command"
-
-    mode := #readonly. didWrite := false.
-    ^ self openPipeFor:command withMode:'r' inDirectory:aDirecrory
-!
 
 readingFrom:command
     "setup the receiver to read from command"
@@ -797,6 +791,13 @@
     ^ self openPipeFor:command withMode:'r'
 !
 
+readingFrom:command inDirectory:aDirecrory
+    "setup the receiver to read from command"
+
+    mode := #readonly. didWrite := false.
+    ^ self openPipeFor:command withMode:'r' inDirectory:aDirecrory
+!
+
 writingTo:command
     "setup the receiver to write to command"
 
@@ -807,6 +808,6 @@
 !PipeStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.67 1998-02-21 16:39:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.68 1998-06-09 12:06:26 cg Exp $'
 ! !
 PipeStream initialize!
hg/stx-libbasic