[etoys-dev] Etoys Inbox: Etoys-kfr.16.mcz
Korakurider
korakurider at gmail.com
Tue Jun 1 22:10:47 EDT 2010
Hi, Karl.
I can't say if there is not problem :-), I really tried it and it
seems to work, the name of category exported to POT.
But we might want to publicly discuss changes to vocabulary with wider
audience (especially folks of edu team) in squeakland list or
tracker.
/Korakurider
On Wed, Jun 2, 2010 at 7:51 AM, karl ramberg <karlramberg at gmail.com> wrote:
> I sent this to the Inbox for testing and reviewing . I'm not sure if this is
> the right way to add a category.
> Karl
>
>
>
> On Wed, Jun 2, 2010 at 12:47 AM, <commits at source.squeak.org> wrote:
>>
>> A new version of Etoys was added to project Etoys Inbox:
>> http://source.squeak.org/etoysinbox/Etoys-kfr.16.mcz
>>
>> ==================== Summary ====================
>>
>> Name: Etoys-kfr.16
>> Author: kfr
>> Time: 2 June 2010, 12:47:35 am
>> UUID: 52d4e13b-602e-2d44-aaeb-d0cac306756f
>> Ancestors: Etoys-kfr.14
>> Backported From: Etoys-kfr.15
>>
>> Makes a read only category 'world geometry' that is only visible to the
>> world.
>>
>> =============== Diff against Etoys-kfr.14 ===============
>>
>> Item was changed:
>> ----- Method: Player>>categoriesForWorld (in category 'slots-kernel')
>> -----
>> categoriesForWorld
>> "Answer the list of categories given that the receiver is the
>> Player representing a World"
>>
>> | aList |
>> + aList _ #(color #'fill & border' scripting #'pen trails' #'world
>> geometry' playfield collections sound) asOrderedCollection.
>> - aList _ #(color #'fill & border' scripting #'pen trails' playfield
>> collections sound) asOrderedCollection.
>> aList add: #input.
>> Preferences eToyFriendly ifFalse:
>> [aList addAll: #(preferences #'as object'
>> display) ].
>>
>> aList addAll: {ScriptingSystem nameForInstanceVariablesCategory.
>> ScriptingSystem nameForScriptsCategory}.
>>
>> ^ aList!
>>
>> Item was added:
>> + ----- Method: Morph class>>additionsToViewerCategoryWorldGeometry (in
>> category '*eToys-scripting') -----
>> + additionsToViewerCategoryWorldGeometry
>> + "answer additions to the geometry viewer category"
>> +
>> + ^ #( #'world geometry'
>> + (
>> + (slot length 'The length' Number readOnly Player
>> getLength Player unused )
>> + (slot width 'The width' Number readOnly Player
>> getWidth Player unused )
>> + (slot left 'The left edge' Number readOnly
>> Player getLeft Player unused )
>> + (slot right 'The right edge' Number readOnly
>> Player getRight Player unused )
>> + (slot top 'The top edge' Number readOnly Player
>> getTop Player unused )
>> + (slot bottom 'The bottom edge' Number readOnly
>> Player getBottom Player unused )
>> +
>> +
>> + )
>> + )
>> +
>> +
>> + !
>>
>> Item was changed:
>> ----- Method: Morph>>filterViewerCategoryDictionary: (in category
>> '*Etoys-scripting') -----
>> filterViewerCategoryDictionary: dict
>> "dict has keys of categories and values of priority.
>> You can remove categories here."
>> +
>> -
>> self wantsConnectionVocabulary
>> ifFalse: [ dict removeKey: #'connections to me' ifAbsent:
>> [].
>> dict removeKey: #connection ifAbsent: []].
>> self wantsConnectorVocabulary
>> ifFalse: [ dict removeKey: #connector ifAbsent: [] ].
>> self wantsEmbeddingsVocabulary
>> ifFalse: [dict removeKey: #embeddings ifAbsent: []].
>> + self isWorldMorph ifFalse:
>> + [dict removeKey: #'world geometry' ifAbsent: []].
>> -
>> Preferences eToyFriendly ifTrue:
>> [#(layout preferences display #'as object') do:
>> [:sym | dict removeKey: sym ifAbsent: []].
>>
>> + self isWorldMorph ifFalse:[
>> + dict removeKey: #preferences ifAbsent: []].
>> - self isWorldMorph ifFalse:
>> - [dict removeKey: #preferences ifAbsent: []].
>> dict removeKey: #display ifAbsent: []]!
>>
>> _______________________________________________
>> etoys-dev mailing list
>> etoys-dev at squeakland.org
>> http://lists.squeakland.org/mailman/listinfo/etoys-dev
>
>
> _______________________________________________
> etoys-dev mailing list
> etoys-dev at squeakland.org
> http://lists.squeakland.org/mailman/listinfo/etoys-dev
>
>
More information about the etoys-dev
mailing list