The Trunk: PreferenceBrowser-mt.93.mcz

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

The Trunk: PreferenceBrowser-mt.93.mcz

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

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

Name: PreferenceBrowser-mt.93
Author: mt
Time: 17 September 2019, 6:59:02.275217 pm
UUID: 51883810-e404-f647-a062-5815539dc0a5
Ancestors: PreferenceBrowser-mt.92

Minor correction in layout configuration for input fields in preference browser.

Note that at some point we should really rewrite that using ToolBuilder.

=============== Diff against PreferenceBrowser-mt.92 ===============

Item was changed:
  ----- Method: PBClassPreferenceView>>textField (in category 'user interface') -----
  textField
 
  | field |
  field := PluggableTextMorphPlus
  on: self
  text: #preferenceValue
  accept: #preferenceValue:.
  field
  borderStyle: BorderStyle inset;
  borderWidth: 1;
  hideScrollBarsIndefinitely;
  acceptOnCR: true;
+ wrapFlag: false;
  minimumHeight: 0;
  vResizing: #rigid;
  hResizing: #spaceFill;
  height: TextStyle defaultFont height + 6.
 
  styler ifNotNil: [:s | field styler: (s view: field)].
 
  ^ field!

Item was changed:
  ----- Method: PBNumericPreferenceView>>textField (in category 'user interface') -----
  textField
  ^(PluggableTextMorph
  on: self
  text: #preferenceValue
  accept: #preferenceValue:)
  borderStyle: BorderStyle inset;
  borderWidth: 1;
  hideScrollBarsIndefinitely;
  acceptOnCR: true;
+ wrapFlag: false;
  vResizing: #rigid;
  hResizing: #spaceFill;
  height: TextStyle defaultFont height + 6;
  yourself.!

Item was changed:
  ----- Method: PBTextPreferenceView>>textField (in category 'user interface') -----
  textField
+
  ^(PluggableTextMorph
  on: self
  text: #preferenceValue
  accept: #preferenceValue:)
  acceptOnCR: true;
+ wrapFlag: false;
  hideScrollBarsIndefinitely;
  borderStyle: BorderStyle inset;
  borderWidth: 1;
  vResizing: #rigid;
  hResizing: #spaceFill;
  height: TextStyle defaultFont height + 6;
+
  yourself.!