Karl Ramberg uploaded a new version of Connectors to project Etoys:
http://source.squeak.org/etoys/Connectors-kfr.196.mcz==================== Summary ====================
Name: Connectors-kfr.196
Author: kfr
Time: 11 March 2012, 1:13:08 pm
UUID: f92eb2a7-b04b-4608-b840-9c0af4ec2460
Ancestors: Connectors-kfr.195
Attach label to connector midpoint
=============== Diff against Connectors-kfr.195 ===============
Item was changed:
----- Method: NCAAConnectorMorph>>addLabel: (in category 'labeling') -----
addLabel: anEvent
| label |
label _ self labelClass new string: ' ' wrap: false minWidth: 20.
label
+ align: label center with: self midpoint;
+ attachUnobnoxiouslyTo: self at: self midpoint;
- align: label center with: anEvent position;
- attachUnobnoxiouslyTo: self at: anEvent position;
dieWithInput: true;
acceptOnCR: true;
acceptOnFocusLoss: true;
selectAll.
self pasteUpMorphOrWorld addMorph: label.
anEvent hand newKeyboardFocus: label label.
^label!
_______________________________________________
etoys-dev mailing list
[hidden email]
http://lists.squeakland.org/mailman/listinfo/etoys-dev