equal
deleted
inserted
replaced
243 ! ! |
243 ! ! |
244 |
244 |
245 !ImageInspectorView methodsFor:'queries'! |
245 !ImageInspectorView methodsFor:'queries'! |
246 |
246 |
247 labelFor:anObject |
247 labelFor:anObject |
248 |l| |
248 |l fn| |
249 |
249 |
250 l := super labelFor:anObject. |
250 l := super labelFor:anObject. |
251 (anObject notNil and:[anObject fileName notNil]) ifTrue:[ |
251 (anObject notNil and:[(fn := anObject fileName) notNil]) ifTrue:[ |
252 l := l , ' (''' , anObject fileName , ''')' |
252 l := l , ' (''' , fn asFilename baseName, ''')' |
253 ]. |
253 ]. |
254 ^ l |
254 ^ l |
|
255 |
|
256 "Modified: / 25-07-2012 / 12:53:13 / cg" |
255 ! ! |
257 ! ! |
256 |
258 |
257 !ImageInspectorView class methodsFor:'documentation'! |
259 !ImageInspectorView class methodsFor:'documentation'! |
258 |
260 |
259 version |
261 version |
260 ^ '$Id: ImageInspectorView.st 7854 2012-01-30 17:49:41Z vranyj1 $' |
262 ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.26 2012/07/25 10:54:12 cg Exp $' |
261 ! |
263 ! |
262 |
264 |
263 version_CVS |
265 version_CVS |
264 ^ '§Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.25 2009/11/05 17:56:43 cg Exp §' |
266 ^ '§Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.26 2012/07/25 10:54:12 cg Exp §' |
265 ! |
267 ! |
266 |
268 |
267 version_SVN |
269 version_SVN |
268 ^ '$Id: ImageInspectorView.st 7854 2012-01-30 17:49:41Z vranyj1 $' |
270 ^ '$Id: ImageInspectorView.st 8026 2012-07-26 16:09:41Z vranyj1 $' |
269 ! ! |
271 ! ! |