The Trunk: ToolBuilder-Kernel-mt.85.mcz

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

The Trunk: ToolBuilder-Kernel-mt.85.mcz

commits-2
Marcel Taeumel uploaded a new version of ToolBuilder-Kernel to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Kernel-mt.85.mcz

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

Name: ToolBuilder-Kernel-mt.85
Author: mt
Time: 29 April 2015, 5:07:23.314 pm
UUID: 9db12438-2c42-ce4c-8643-edb7a6289a88
Ancestors: ToolBuilder-Kernel-mt.84

Added configuration options for margin, padding, and resize handles (i.e. splitter morphs in Morphic) to widget and composite specs.

=============== Diff against ToolBuilder-Kernel-mt.84 ===============

Item was changed:
  PluggableWidgetSpec subclass: #PluggableCompositeSpec
+ instanceVariableNames: 'children layout wantsResizeHandles spacing'
- instanceVariableNames: 'children layout'
  classVariableNames: ''
  poolDictionaries: ''
  category: 'ToolBuilder-Kernel'!
 
  !PluggableCompositeSpec commentStamp: 'ar 2/11/2005 21:58' prior: 0!
  A composite user interface element.
 
  Instance variables:
  children <Symbol|Collection> Symbol to retrieve children or children directly
  layout <Symbol> The layout for this composite.
  !

Item was added:
+ ----- Method: PluggableCompositeSpec>>spacing (in category 'layout hints') -----
+ spacing
+ "...between components of this widget."
+
+ ^ spacing!

Item was added:
+ ----- Method: PluggableCompositeSpec>>spacing: (in category 'layout hints') -----
+ spacing: numberOrPoint
+
+ spacing := numberOrPoint.!

Item was added:
+ ----- Method: PluggableCompositeSpec>>wantsResizeHandles (in category 'accessing') -----
+ wantsResizeHandles
+
+ ^ wantsResizeHandles ifNil: [false]!

Item was added:
+ ----- Method: PluggableCompositeSpec>>wantsResizeHandles: (in category 'accessing') -----
+ wantsResizeHandles: aBoolean
+
+ wantsResizeHandles := aBoolean.!

Item was changed:
  ToolBuilderSpec subclass: #PluggableWidgetSpec
+ instanceVariableNames: 'model frame color minimumExtent margin padding'
- instanceVariableNames: 'model frame color minimumExtent'
  classVariableNames: ''
  poolDictionaries: ''
  category: 'ToolBuilder-Kernel'!
 
  !PluggableWidgetSpec commentStamp: 'ar 2/9/2005 18:40' prior: 0!
  The abstract superclass for all widgets.
 
  Instance variables:
  model <Object> The object the various requests should be directed to.
  frame <Rectangle> The associated layout frame for this object (if any).
  !

Item was added:
+ ----- Method: PluggableWidgetSpec>>margin (in category 'layout hints') -----
+ margin
+ "Space outside the widgets border.
+ See: http://www.w3.org/wiki/The_CSS_layout_model_-_boxes_borders_margins_padding"
+
+ ^ margin!

Item was added:
+ ----- Method: PluggableWidgetSpec>>margin: (in category 'layout hints') -----
+ margin: numberOrPointOrRectangle
+
+ margin := numberOrPointOrRectangle.!

Item was added:
+ ----- Method: PluggableWidgetSpec>>padding (in category 'layout hints') -----
+ padding
+ "Space inside the widget's border.
+ See: http://www.w3.org/wiki/The_CSS_layout_model_-_boxes_borders_margins_padding"
+
+ ^ padding!

Item was added:
+ ----- Method: PluggableWidgetSpec>>padding: (in category 'layout hints') -----
+ padding: numberOrPointOrRectangle
+
+ padding := numberOrPointOrRectangle.!