1472 toolbox |
1472 toolbox |
1473 "Answer a toolbox for receiver. A toolbox is used by language-agnostic tools (such as |
1473 "Answer a toolbox for receiver. A toolbox is used by language-agnostic tools (such as |
1474 class browser) to perform language-specific tasks (search for implementors, |
1474 class browser) to perform language-specific tasks (search for implementors, |
1475 build implementor menu and so on. If nil is returned, no toolbox available" |
1475 build implementor menu and so on. If nil is returned, no toolbox available" |
1476 |
1476 |
1477 | class | |
1477 ^ self toolboxClass new. |
1478 |
|
1479 class := self toolboxClass. |
|
1480 ^ class notNil |
|
1481 ifTrue:[ class new] |
|
1482 ifFalse:[ nil ] |
|
1483 |
1478 |
1484 "Created: / 31-08-2013 / 10:15:01 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1479 "Created: / 31-08-2013 / 10:15:01 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1485 "Modified: / 31-08-2013 / 23:42:42 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1480 "Modified: / 24-02-2014 / 16:32:17 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1486 ! ! |
1481 ! ! |
1487 |
1482 |
1488 !ProgrammingLanguage methodsFor:'accessing - classes'! |
1483 !ProgrammingLanguage methodsFor:'accessing - classes'! |
1489 |
1484 |
1490 toolboxClass |
1485 toolboxClass |
1491 "Answer a 'toolbox class'. A toolbox is used by language-agnostic tools (such as |
1486 "Answer a 'toolbox class'. A toolbox is used by language-agnostic tools (such as |
1492 class browser) to perform language-specific tasks (search for implementors, |
1487 class browser) to perform language-specific tasks (search for implementors, |
1493 build implementor menu and so on. If nil is returned, no toolbox available" |
1488 build implementor menu and so on. If nil is returned, no toolbox available" |
1494 |
1489 |
1495 ^ nil |
1490 ^ Tools::GenericToolbox |
1496 |
1491 |
1497 "Created: / 31-08-2013 / 10:07:04 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1492 "Created: / 31-08-2013 / 10:07:04 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1493 "Modified: / 24-02-2014 / 16:32:32 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1498 ! ! |
1494 ! ! |
1499 |
1495 |
1500 !Rectangle methodsFor:'inspecting'! |
1496 !Rectangle methodsFor:'inspecting'! |
1501 |
1497 |
1502 inspectorValueStringInListFor:anInspector |
1498 inspectorValueStringInListFor:anInspector |
2318 ! ! |
2314 ! ! |
2319 |
2315 |
2320 !stx_libtool class methodsFor:'documentation'! |
2316 !stx_libtool class methodsFor:'documentation'! |
2321 |
2317 |
2322 extensionsVersion_CVS |
2318 extensionsVersion_CVS |
2323 ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.120 2014-02-23 11:35:09 cg Exp $' |
2319 ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.121 2014-02-25 10:39:31 vrany Exp $' |
2324 ! ! |
2320 ! ! |
2325 |
2321 |
2326 !stx_libtool class methodsFor:'documentation'! |
2322 !stx_libtool class methodsFor:'documentation'! |
2327 |
2323 |
2328 extensionsVersion_HG |
2324 extensionsVersion_HG |