[squeak-dev] The Trunk: Monticello-mt.772.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Feb 8 12:46:47 UTC 2022


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

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

Name: Monticello-mt.772
Author: mt
Time: 8 February 2022, 1:46:46.990027 pm
UUID: 486ad440-73e9-0f40-a4b0-6c3766f61272
Ancestors: Monticello-cmm.771

Complements Morphic-mt.1876

=============== Diff against Monticello-cmm.771 ===============

Item was changed:
  ----- Method: MCOperationsBrowser>>widgetSpecs (in category 'ui') -----
  widgetSpecs
  	Preferences annotationPanes ifFalse: [ ^#(
  		((listMorph:selection:menu:keystroke: list selection methodListMenu: methodListKey:from:) (0 0 1 0.4) (0 0 0 0))
  		((textMorph: text) (0 0.4 1 1))
  		) ].
  
  	^ #(
+ 		((listMorph:selection:menu:keystroke: list selection methodListMenu: methodListKey:from:) (0 0 1 0.5) (0 0 0 defaultAnnotationPaneHeightNegated))
+ 		((textMorph: annotations) (0 0.5 1 0.5) (0 defaultAnnotationPaneHeightNegated 0 0))
+ 		((textMorph: text) (0 0.5 1 1) (0 0 0 0))
- 		((listMorph:selection:menu:keystroke: list selection methodListMenu: methodListKey:from:) (0 0 1 0.4) (0 0 0 0))
- 		((textMorph: annotations) (0 0.4 1 0.4) (0 0 0 defaultAnnotationPaneHeight))
- 		((textMorph: text) (0 0.4 1 1) (0 defaultAnnotationPaneHeight 0 0))
  	)!

Item was changed:
  ----- Method: MCTool>>defaultAnnotationPaneHeight (in category 'morphic ui') -----
  defaultAnnotationPaneHeight 
  	"Answer the receiver's preferred default height for new annotation panes.
  	Since MC compares two annotations, reserve a bit less than a double the traditional height."
  	
+ 	^ ToolBuilder default inputFieldHeightFor: 2 "lines"!
- 	^ Preferences standardDefaultTextFont height * 3!

Item was changed:
  ----- Method: MCTool>>defaultButtonPaneHeight (in category 'morphic ui') -----
  defaultButtonPaneHeight
  	"Answer the user's preferred default height for new button panes."
  
+ 	^ ToolBuilder default buttonRowHeight!
- 	^ (Preferences standardButtonFont height * 2.5) rounded!

Item was changed:
  ----- Method: MCTool>>defaultInputFieldHeight (in category 'morphic ui') -----
  defaultInputFieldHeight
  
+ 	^ ToolBuilder default inputFieldHeight!
- 	^ Preferences standardDefaultTextFont height * 2!



More information about the Squeak-dev mailing list