equal
deleted
inserted
replaced
268 Simply returns the className or name of anObjects class" |
268 Simply returns the className or name of anObjects class" |
269 |
269 |
270 |s| |
270 |s| |
271 |
271 |
272 anObject isProtoObject ifTrue:[ |
272 anObject isProtoObject ifTrue:[ |
273 ^ anObject displayString. |
273 ^ anObject class nameWithArticle. |
274 ]. |
274 ]. |
275 |
275 |
276 anObject isClass ifTrue:[ |
276 anObject isClass ifTrue:[ |
277 s := anObject displayString |
277 s := anObject displayString |
278 ] ifFalse:[ |
278 ] ifFalse:[ |
290 ^ 'something' |
290 ^ 'something' |
291 ]. |
291 ]. |
292 ^ s |
292 ^ s |
293 |
293 |
294 "Created: / 15-07-2011 / 16:20:06 / cg" |
294 "Created: / 15-07-2011 / 16:20:06 / cg" |
|
295 "Modified: / 29-11-2017 / 10:22:15 / stefan" |
295 ! ! |
296 ! ! |
296 |
297 |
297 !InspectorView class methodsFor:'defaults'! |
298 !InspectorView class methodsFor:'defaults'! |
298 |
299 |
299 defaultExtent |
300 defaultExtent |