Tim Felgentreff uploaded a new version of EToys to project The Trunk: http://source.squeak.org/trunk/EToys-tfel.258.mcz
==================== Summary ====================
Name: EToys-tfel.258 Author: tfel Time: 28 September 2016, 5:27:37.334594 pm UUID: ef184947-0831-4b86-9f5f-5707547734bc Ancestors: EToys-tfel.257
- Fix for duplicating KedamaMorphs with non-visible patches or turtles - be careful not to loose top level projects when deleting projects through the etoys history morph - setTurtleCount: on a vector player should go to the exampler player
=============== Diff against EToys-tfel.257 ===============
Item was changed: ----- Method: EToyProjectHistoryMorph>>confirmedDelete:evt:from: (in category 'as yet unclassified') ----- confirmedDelete: aProject evt: evt from: origin self delete. aProject = Project current ifTrue: [ ^ self inform: 'Cannot delete current project' translated]. (self confirm: ('Do you really want to delete {1} and all its content?' translated format: {aProject name})) + ifTrue: [ + aProject isTopProject ifTrue: [Project current beTopProject]. + aProject delete. + Project rebuildAllProjects].! - ifTrue: [aProject delete].!
Item was changed: ----- Method: KedamaMorph>>duplicate (in category 'as yet unclassified') ----- duplicate
| allMorphBounds allMorphs allOwners copyW s w | allMorphs := {self}, self player allPatchAndTurtleMorphs. allOwners := allMorphs collect: #owner. allMorphBounds := allMorphs allButFirst inject: self bounds into: [:acc :next | next bounds merge: acc]. w := PasteUpMorph new. w bounds: allMorphBounds. w openInWorld. w addAllMorphs: allMorphs. copyW := w duplicate. + allMorphs withIndexDo: [:m :idx | (allOwners at: idx) ifNotNil: [:o | o addMorph: m]]. - allMorphs withIndexDo: [:m :idx | (allOwners at: idx) addMorph: m]. w delete. s := SelectionMorph new. s bounds: copyW bounds. s selectSubmorphsOf: copyW. ^ s!
Item was added: + ----- Method: KedamaTurtleVectorPlayer2>>setTurtleCount: (in category 'slot-kedama') ----- + setTurtleCount: aNumber + + ^ exampler setTurtleCount: aNumber!
packages@lists.squeakfoundation.org