[Pkg] The Trunk: Morphic-mt.1282.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Aug 16 07:52:25 UTC 2016


Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.1282.mcz

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

Name: Morphic-mt.1282
Author: mt
Time: 16 August 2016, 9:50:08.365039 am
UUID: 79da2b14-6474-ec4c-8e5c-f6408c959f70
Ancestors: Morphic-mt.1281

Fixes regression in Fill-in-the-blank morph by making it resizable again. (Use visible corner grips as in the list chooser.)

=============== Diff against Morphic-mt.1281 ===============

Item was changed:
  ----- Method: FillInTheBlankMorph>>setQuery:initialAnswer:answerExtent:acceptOnCR: (in category 'initialization') -----
  setQuery: queryString initialAnswer: initialAnswer answerExtent: answerExtent acceptOnCR: acceptBoolean 
  	
  	| text |
  	
  	result := initialAnswer.
  	done := false.
  
  	self paneMorph removeAllMorphs.
  
  	self title: 'Input Requested'.
  	self message: queryString.
  	
  	text := self createTextPaneAcceptOnCR: acceptBoolean.
  	self paneMorph addMorphBack: text.
  
+ 	self paneMorph
+ 		wantsPaneSplitters: true;
+ 		addCornerGrips.
+ 	self paneMorph grips do: [:ea | ea drawCornerResizeHandles: true].
+ 		
  	self paneMorph extent: ((initialAnswer asText asMorph extent + (20 at 10) max: answerExtent) min: 500 at 500).	
  	self setDefaultParameters.!



More information about the Packages mailing list