equal
deleted
inserted
replaced
7791 " |
7791 " |
7792 |
7792 |
7793 "Created: / 30-08-2006 / 15:29:49 / cg" |
7793 "Created: / 30-08-2006 / 15:29:49 / cg" |
7794 ! |
7794 ! |
7795 |
7795 |
|
7796 classNamed:aClassName |
|
7797 "answer one of my classes. |
|
7798 This makes me look a bit like a namespace (which I am not currently); |
|
7799 in preparation for a future require package mechanism..." |
|
7800 |
|
7801 ^ Smalltalk classNamed:aClassName |
|
7802 |
|
7803 " |
|
7804 stx_libhtml classNames |
|
7805 stx_libhtml classNamesAndAttributesAsSpecArray |
|
7806 " |
|
7807 ! |
|
7808 |
7796 classNames |
7809 classNames |
7797 "answer an array containing all the class names of the project's classes" |
7810 "answer an array containing all the class names of the project's classes" |
7798 |
7811 |
7799 ^ self classNamesAndAttributesAsSpecArray collect:[:entry | entry first]. |
7812 ^ self classNamesAndAttributesAsSpecArray collect:[:entry | entry first]. |
7800 |
7813 |