WindowGroup.st
changeset 393 3504a0adbb2d
parent 388 64e43f82d93e
child 403 a3ff487fba88
equal deleted inserted replaced
392:caf4452ec3dd 393:3504a0adbb2d
   796 				]
   796 				]
   797 			    ]
   797 			    ]
   798 			].
   798 			].
   799 			key == #Escape ifTrue:[
   799 			key == #Escape ifTrue:[
   800 			    isModal ifTrue:[
   800 			    isModal ifTrue:[
   801 				topViews first hide
   801 				topViews first hideRequest
   802 			    ]
   802 			    ]
   803 			]
   803 			]
   804 		    ].
   804 		    ].
   805 		    event isPointerEnterEvent ifTrue:[
   805 		    event isPointerEnterEvent ifTrue:[
   806 			pointerView := event view
   806 			pointerView := event view
  1160 ! !
  1160 ! !
  1161 
  1161 
  1162 !WindowGroup class methodsFor:'documentation'!
  1162 !WindowGroup class methodsFor:'documentation'!
  1163 
  1163 
  1164 version
  1164 version
  1165     ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.59 1996-01-31 01:50:48 cg Exp $'
  1165     ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.60 1996-02-01 19:49:40 cg Exp $'
  1166 ! !
  1166 ! !
  1167 WindowGroup initialize!
  1167 WindowGroup initialize!