equal
deleted
inserted
replaced
2181 view isNil ifTrue:[^ nil]. |
2181 view isNil ifTrue:[^ nil]. |
2182 |
2182 |
2183 "/ stupid check, if I know about this view |
2183 "/ stupid check, if I know about this view |
2184 prop := self propertyOfView:view. |
2184 prop := self propertyOfView:view. |
2185 prop notNil ifTrue:[^ prop view]. |
2185 prop notNil ifTrue:[^ prop view]. |
2186 self halt. |
2186 self halt:'nil property'. |
2187 ^ nil |
2187 ^ nil |
2188 ! |
2188 ! |
2189 |
2189 |
2190 findViewWithId:aViewId |
2190 findViewWithId:aViewId |
2191 "finds view assigned to identifier and returns the view or nil |
2191 "finds view assigned to identifier and returns the view or nil |