equal
deleted
inserted
replaced
2374 nIdx := object size. |
2374 nIdx := object size. |
2375 |
2375 |
2376 s := CharacterWriteStream on:''. |
2376 s := CharacterWriteStream on:''. |
2377 names := self indexList. |
2377 names := self indexList. |
2378 names size > 0 ifTrue:[ |
2378 names size > 0 ifTrue:[ |
2379 maxLen := (names collect:[:eachName | eachName printString size]) max. |
2379 maxLen := names inject:0 into:[:maxSoFar :eachName | (eachName printString size) max:maxSoFar]. |
2380 padLeft := names conform:[:eachIdx | eachIdx isInteger]. |
2380 padLeft := names conform:[:eachIdx | eachIdx isInteger]. |
2381 |
2381 |
2382 names do:[:eachIdx | |
2382 names do:[:eachIdx | |
2383 |val| |
2383 |val| |
2384 |
2384 |
2385 padLeft ifTrue:[ |
2385 padLeft ifTrue:[ |
3324 |
3324 |
3325 self "topView" withWaitCursorDo:[ |
3325 self "topView" withWaitCursorDo:[ |
3326 [ |
3326 [ |
3327 s := self displayStringForValue:someValue. |
3327 s := self displayStringForValue:someValue. |
3328 ] valueWithWatchDog:[ |
3328 ] valueWithWatchDog:[ |
3329 s := someValue classNameWithArticle |
3329 s := someValue classNameWithArticle,' "- printString generation took too long"' |
3330 ] afterMilliseconds:100. |
3330 ] afterMilliseconds:1000. |
3331 |
3331 |
3332 s = workspace selectionAsString ifFalse:[ |
3332 s = workspace selectionAsString ifFalse:[ |
3333 workspace replace:s. |
3333 workspace replace:s. |
3334 ]. |
3334 ]. |
3335 ]. |
3335 ]. |
3503 ! ! |
3503 ! ! |
3504 |
3504 |
3505 !InspectorView class methodsFor:'documentation'! |
3505 !InspectorView class methodsFor:'documentation'! |
3506 |
3506 |
3507 version |
3507 version |
3508 ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.303 2013-04-02 09:33:13 stefan Exp $' |
3508 ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.304 2013-04-04 07:39:21 cg Exp $' |
3509 ! |
3509 ! |
3510 |
3510 |
3511 version_CVS |
3511 version_CVS |
3512 ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.303 2013-04-02 09:33:13 stefan Exp $' |
3512 ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.304 2013-04-04 07:39:21 cg Exp $' |
3513 ! ! |
3513 ! ! |
3514 |
3514 |