--- a/WindowGroup.st Sat Apr 13 21:16:20 1996 +0200
+++ b/WindowGroup.st Sat Apr 13 22:30:16 1996 +0200
@@ -217,8 +217,8 @@
activeProcess := Processor activeProcess.
" caching the last value ..."
- activeProcess == LastActive ifTrue:[
- LastActiveGroup process == LastActive ifTrue:[
+ activeProcess == LastActiveProcess ifTrue:[
+ LastActiveGroup process == LastActiveProcess ifTrue:[
^ LastActiveGroup
]
].
@@ -1279,6 +1279,6 @@
!WindowGroup class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.72 1996-03-07 16:48:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.73 1996-04-13 20:30:16 cg Exp $'
! !
WindowGroup initialize!