The Trunk: PreferenceBrowser-mt.52.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.52.mcz

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

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

Name: PreferenceBrowser-mt.52
Author: mt
Time: 19 April 2015, 9:09:02.265 am
UUID: 489d6297-3cb0-544f-8e78-3218ca5b692e
Ancestors: PreferenceBrowser-mt.51

New interface for managing scrollbar visibility in scroll panes used.

=============== Diff against PreferenceBrowser-mt.51 ===============

Item was changed:
  ----- Method: PBNumericPreferenceView>>textField (in category 'user interface') -----
  textField
  ^(PluggableTextMorph
  on: self
  text: #preferenceValue
  accept: #preferenceValue:)
+ hideScrollBarsIndefinitely;
- hideVScrollBarIndefinitely: true;
  borderColor: #inset;
  acceptOnCR: true;
  color: Color gray veryMuchLighter;
  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:)
+ hideScrollBarsIndefinitely;
- hideVScrollBarIndefinitely: true;
  borderColor: #inset;
  acceptOnCR: true;
  color: Color gray veryMuchLighter;
  vResizing: #rigid;
  hResizing: #spaceFill;
  height: TextStyle defaultFont height + 6;
  yourself.!

Item was changed:
  ----- Method: PreferenceBrowserMorph>>newSearchTextField (in category 'submorphs - search panel') -----
  newSearchTextField
  | ptm |
  ptm := PluggableTextMorphPlus
  on: self model
  text: #searchPatternNeverTriggered
  accept: #searchPattern:.
  ptm
  balloonText: 'Search preferences ...';
+ hideScrollBarsIndefinitely;
- hideVScrollBarIndefinitely: true;
  layoutFrame: (LayoutFrame fractions: (0@0 corner: 1@0) offsets: (0@0 corner: 0@ 30));
  borderInset;
  color: Color white;
  vResizing: #rigid;
  hResizing: #spaceFill;
  height: TextStyle defaultFont height * 2;
  acceptOnCR: true;
  onKeyStrokeSend: #value to: [ ptm hasUnacceptedEdits ifTrue: [ ptm accept ] ].
  ^ptm.!