equal
deleted
inserted
replaced
1399 ! ! |
1399 ! ! |
1400 |
1400 |
1401 !Object methodsFor:'inspecting'! |
1401 !Object methodsFor:'inspecting'! |
1402 |
1402 |
1403 inspector2Tabs |
1403 inspector2Tabs |
1404 self inspectorClass ~~ Inspector ifTrue:[ |
1404 | tabs | |
1405 ^ #( inspector2TabCommon inspector2TabForBasicInspect ) |
1405 |
1406 ]. |
1406 tabs := self inspectorClass ~~ Inspector |
1407 |
1407 ifTrue:[#( inspector2TabCommon inspector2TabForBasicInspect )] |
1408 ^ #( inspector2TabCommon ) |
1408 ifFalse:[#( inspector2TabCommon )]. |
|
1409 |
|
1410 "/ Workaround for stc bug |
|
1411 ((self >> #inspector2TabClass) annotationAt: #inspector2Tab) isNil ifTrue:[ |
|
1412 tabs := tabs copyWith:#inspector2TabClass |
|
1413 ]. |
|
1414 ^ tabs |
|
1415 |
|
1416 " |
|
1417 1 inspect |
|
1418 self inspect |
|
1419 " |
1409 |
1420 |
1410 "Created: / 05-07-2011 / 13:39:24 / cg" |
1421 "Created: / 05-07-2011 / 13:39:24 / cg" |
|
1422 "Modified: / 04-02-2015 / 12:37:52 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1411 ! ! |
1423 ! ! |
1412 |
1424 |
1413 !Object methodsFor:'debugging'! |
1425 !Object methodsFor:'debugging'! |
1414 |
1426 |
1415 inspectorExtraAttributes |
1427 inspectorExtraAttributes |
2419 ! ! |
2431 ! ! |
2420 |
2432 |
2421 !stx_libtool class methodsFor:'documentation'! |
2433 !stx_libtool class methodsFor:'documentation'! |
2422 |
2434 |
2423 extensionsVersion_CVS |
2435 extensionsVersion_CVS |
2424 ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.137 2015-02-03 11:18:00 vrany Exp $' |
2436 ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.138 2015-02-04 15:02:45 vrany Exp $' |
2425 ! ! |
2437 ! ! |
2426 |
2438 |
2427 !stx_libtool class methodsFor:'documentation'! |
2439 !stx_libtool class methodsFor:'documentation'! |
2428 |
2440 |
2429 extensionsVersion_HG |
2441 extensionsVersion_HG |