--- 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!