The Trunk: Nebraska-tpr.50.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Nebraska-tpr.50.mcz

commits-2
tim Rowledge uploaded a new version of Nebraska to project The Trunk:
http://source.squeak.org/trunk/Nebraska-tpr.50.mcz

==================== Summary ====================

Name: Nebraska-tpr.50
Author: tpr
Time: 7 August 2017, 6:38:27.598699 pm
UUID: 633f7da3-da1d-44ee-8bdc-3f417d8db1ec
Ancestors: Nebraska-tpr.49

Fix a dumb-thumb in the prior update

=============== Diff against Nebraska-tpr.49 ===============

Item was changed:
  ----- Method: NebraskaCommunicatorMorph>>textEntryFieldNamed:with:help: (in category 'as yet unclassified') -----
  textEntryFieldNamed: aSymbol with: aString help: helpString
 
  | f col |
  f := (StringMorph new contents: aString; font: Preferences standardEToysFont; yourself)
  setBalloonText: helpString;
  on: #mouseUp send: #editEvent:for: to: self.
  self field: aSymbol is: f.
+ col := (self inAColumn: {f}) color: Color white; hResizing: #shrinkWrap.
- col _ (self inAColumn: {f}) color: Color white; hResizing: #shrinkWrap.
  ^col!