BrowserView.st
changeset 753 72a555a0c626
parent 752 2bfe2b7e572a
child 756 357db0b88e1b
--- a/BrowserView.st	Fri Oct 11 19:19:16 1996 +0200
+++ b/BrowserView.st	Sat Oct 12 18:28:51 1996 +0200
@@ -2217,11 +2217,11 @@
         rev notNil ifTrue:[
             rev withoutSpaces isEmpty ifTrue:[
                 msg := 'extracting newest %1'.
-                aStream := mgr mostRecentSourceStreamForClassNamed:nm.
+                aStream := mgr getMostRecentSourceStreamForClassNamed:nm.
                 revString := 'newest'
             ] ifFalse:[
                 msg := 'extracting previous %1'.
-                aStream := mgr sourceStreamFor:currentClass revision:rev.
+                aStream := mgr getSourceStreamFor:currentClass revision:rev.
                 revString := rev
             ].
             self busyLabel:msg with:nm.
@@ -2260,7 +2260,7 @@
     ]
 
     "Created: 14.11.1995 / 16:43:15 / cg"
-    "Modified: 27.2.1996 / 17:52:25 / cg"
+    "Modified: 12.10.1996 / 17:22:35 / cg"
 !
 
 classCreateSourceContainerFor:aClass
@@ -2735,13 +2735,13 @@
             rev withoutSpaces isEmpty ifTrue:[
                 what := className , '(newest)'.
                 self busyLabel:'extracting %1' with:what.
-                aStream := mgr mostRecentSourceStreamForClassNamed:className.
+                aStream := mgr getMostRecentSourceStreamForClassNamed:className.
                 revString := 'newest'.
                 keep := false.
             ] ifFalse:[
                 what := className , '(' , rev , ')'.
                 self busyLabel:'extracting %1' with:what.
-                aStream := mgr sourceStreamFor:currentClass revision:rev.
+                aStream := mgr getSourceStreamFor:currentClass revision:rev.
                 revString := rev.
                 keep := true.
             ].
@@ -2794,7 +2794,7 @@
     ]
 
     "Created: 14.11.1995 / 16:43:15 / cg"
-    "Modified: 11.9.1996 / 19:06:02 / cg"
+    "Modified: 12.10.1996 / 17:22:40 / cg"
 !
 
 classModifyContainer
@@ -7810,6 +7810,6 @@
 !BrowserView  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.175 1996-10-11 17:19:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.176 1996-10-12 16:28:51 cg Exp $'
 ! !
 BrowserView initialize!