Karl Ramberg uploaded a new version of MorphicExtras to project Etoys:
http://source.squeak.org/etoys/MorphicExtras-kfr.27.mcz==================== Summary ====================
Name: MorphicExtras-kfr.27
Author: kfr
Time: 26 July 2011, 7:22:36 pm
UUID: 97555dda-22cb-1346-a674-f28eedd1ce15
Ancestors: MorphicExtras-kfr.26
http://tracker.squeakland.org/browse/SQ-967=============== Diff against MorphicExtras-kfr.26 ===============
Item was changed:
----- Method: FlapTab>>addCustomMenuItems:hand: (in category 'menu') -----
addCustomMenuItems: aMenu hand: aHandMorph
"Add further items to the menu as appropriate"
aMenu add: 'tab color...' translated target: self action: #changeColor.
aMenu add: 'flap color...' translated target: self action: #changeFlapColor.
aMenu addLine.
aMenu addUpdating: #edgeString action: #setEdgeToAdhereTo.
aMenu addLine.
aMenu addUpdating: #textualTabString action: #textualTab.
aMenu addUpdating: #graphicalTabString action: #graphicalTab.
aMenu addUpdating: #solidTabString enablement: #notSolid action: #solidTab.
aMenu addLine.
(referent isKindOf: PasteUpMorph) ifTrue:
[aMenu addUpdating: #partsBinString action: #togglePartsBinMode].
aMenu addUpdating: #dragoverString action: #toggleDragOverBehavior.
aMenu addUpdating: #mouseoverString action: #toggleMouseOverBehavior.
aMenu addLine.
aMenu addUpdating: #isGlobalFlapString enablement: #sharedFlapsAllowed action: #toggleIsGlobalFlap.
+ aMenu balloonTextForLastItem: 'If checked, this flap will be available in all morphic projects; if not, it will be private to this project.' translated.
- aMenu balloonTextForLastItem: 'If checked, this flap will be available in all morphic projects; if not, it will be private to this project.,' translated.
aMenu addLine.
aMenu addUpdating: #compactFlapString target: self action: #changeCompactFlap.
aMenu add: 'destroy this flap' translated action: #destroyFlap.
"aMenu addUpdating: #slideString action: #toggleSlideBehavior.
aMenu addUpdating: #inboardString action: #toggleInboardness.
aMenu addUpdating: #thicknessString ('thickness... (current: ', self thickness printString, ')') action: #setThickness."
!
_______________________________________________
etoys-dev mailing list
[hidden email]
http://lists.squeakland.org/mailman/listinfo/etoys-dev