checkin from browser
authorClaus Gittinger <cg@exept.de>
Fri, 05 Feb 1999 00:14:52 +0100
changeset 2438 618503d1c7f6
parent 2437 2058aceaed41
child 2439 358644786358
checkin from browser
WGroup.st
WindowGroup.st
--- a/WGroup.st	Fri Feb 05 00:13:09 1999 +0100
+++ b/WGroup.st	Fri Feb 05 00:14:52 1999 +0100
@@ -1276,8 +1276,7 @@
 
             (views notNil or:[topViews notNil]) ifTrue:[
                 view := event view.
-                (aViewOrNil isNil
-                or:[aViewOrNil == view]) ifTrue:[
+                (aViewOrNil isNil or:[aViewOrNil == view]) ifTrue:[
                     LastEventQuerySignal handle:[:ex |
                         ex proceedWith:event
                     ] do:[
@@ -1863,6 +1862,6 @@
 !WindowGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/WGroup.st,v 1.147 1998-12-03 13:22:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/WGroup.st,v 1.148 1999-02-04 23:14:52 cg Exp $'
 ! !
 WindowGroup initialize!
--- a/WindowGroup.st	Fri Feb 05 00:13:09 1999 +0100
+++ b/WindowGroup.st	Fri Feb 05 00:14:52 1999 +0100
@@ -1276,8 +1276,7 @@
 
             (views notNil or:[topViews notNil]) ifTrue:[
                 view := event view.
-                (aViewOrNil isNil
-                or:[aViewOrNil == view]) ifTrue:[
+                (aViewOrNil isNil or:[aViewOrNil == view]) ifTrue:[
                     LastEventQuerySignal handle:[:ex |
                         ex proceedWith:event
                     ] do:[
@@ -1863,6 +1862,6 @@
 !WindowGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.147 1998-12-03 13:22:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.148 1999-02-04 23:14:52 cg Exp $'
 ! !
 WindowGroup initialize!