The Trunk: Tools-mt.602.mcz

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

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

Name: Tools-mt.602
Author: mt
Time: 24 April 2015, 11:06:20.898 am
UUID: 8d363d2f-f231-ce40-8a3c-18b3cf5d32af
Ancestors: Tools-cmm.601

Updates singleton browsers to reduce the minimum heights of their singleton lists.

=============== Diff against Tools-cmm.601 ===============

Item was changed:
  ----- Method: Browser>>buildClassListSingletonWith: (in category 'toolbuilder') -----
  buildClassListSingletonWith: builder
  | listSpec |
  listSpec := builder pluggableListSpec new.
  listSpec
  model: self;
  list: #classListSingleton;
  getIndex: #indexIsOne;
  setIndex: #indexIsOne:;
  menu: #classListMenu:shifted:;
  keyPress: #classListKey:from:;
  hScrollBarPolicy: #never;
+ vScrollBarPolicy: #never;
+ minimumHeight: 0.
- vScrollBarPolicy: #never.
  ^listSpec
  !

Item was changed:
  ----- Method: Browser>>buildMessageListCatSingletonWith: (in category 'toolbuilder') -----
  buildMessageListCatSingletonWith: builder
  | listSpec |
  listSpec := builder pluggableListSpec new.
  listSpec
  model: self;
  list: #messageCatListSingleton;
  getIndex: #indexIsOne;
  setIndex: #indexIsOne:;
  menu: #messageCategoryMenu:;
  hScrollBarPolicy: #never;
+ vScrollBarPolicy: #never;
+ minimumHeight: 0.
- vScrollBarPolicy: #never.
  ^listSpec
  !

Item was changed:
  ----- Method: Browser>>buildSystemCatListSingletonWith: (in category 'toolbuilder') -----
  buildSystemCatListSingletonWith: builder
  | listSpec |
  listSpec := builder pluggableListSpec new.
  listSpec
  model: self;
  list: #systemCategorySingleton;
  getIndex: #indexIsOne;
  setIndex: #indexIsOne:;
  menu: #systemCategoryMenu:;
  keyPress: #systemCatSingletonKey:from:;
  hScrollBarPolicy: #never;
+ vScrollBarPolicy: #never;
+ minimumHeight: 0.
- vScrollBarPolicy: #never.
  ^listSpec!