--- a/ObjectView.st Fri Mar 17 15:00:10 2006 +0100
+++ b/ObjectView.st Mon Mar 20 09:54:15 2006 +0100
@@ -3076,9 +3076,11 @@
|hdelta|
+ contents isEmptyOrNil ifTrue:[^ nil].
+
hdelta := self hitDelta.
contents reverseDo:[:object |
- (object isHitBy:aPoint withDelta:hdelta) ifTrue:[^ object]
+ (object isHitBy:aPoint withDelta:hdelta) ifTrue:[^ object]
].
^ nil
!
@@ -3381,5 +3383,5 @@
!ObjectView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.114 2006-03-16 19:43:50 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.115 2006-03-20 08:54:15 cg Exp $'
! !