changeset 2358 | ba3ed08ea8dd |
parent 2348 | a9c60093561a |
child 2362 | a6a7ef98fdc3 |
2357:48ed61c2825e | 2358:ba3ed08ea8dd |
---|---|
2037 ]. |
2037 ]. |
2038 ^ p view |
2038 ^ p view |
2039 ! |
2039 ! |
2040 |
2040 |
2041 findObjectAt:aPoint |
2041 findObjectAt:aPoint |
2042 "find the origin/corner of the currentWidget |
|
2043 " |
|
2044 |view prop| |
2042 |view prop| |
2045 |
2043 |
2046 view := super findObjectAt:aPoint. |
2044 view := super findObjectAt:aPoint. |
2047 prop := self propertyOfView:view. |
2045 prop := self propertyOfView:view. |
2048 |
2046 |