Squeak-dev June 2020

squeak-dev@lists.squeakfoundation.org

43 participants
346 discussions

Monticello postscript problem
by Martin Kuball 04 Jun '20

04 Jun '20

Hi all, I have a problem with a postscript in one of my Monticello packages. It fails to execute because a class used in the script did not had it's initialize method run, yet. I took a look under the hood and found, that the postscript and the initializer execs are all mixed together in one list. But the postscript was not at the end of this list. So is this a bug or is there for some reason no guarantee that the postscript is run when everything else is done? I fixed this for me by running twice over the list. First for the non-scripts and then for the scripts. Not very pretty but seems to do the job. Martin

3 6

The Trunk: Tests-ct.426.mcz
by commits＠source.squeak.org 04 Jun '20

04 Jun '20

Marcel Taeumel uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-ct.426.mcz ==================== Summary ==================== Name: Tests-ct.426 Author: ct Time: 6 February 2020, 6:58:06.300648 pm UUID: 2a0d3e63-9e48-5040-a1af-145fa43c9695 Ancestors: Tests-mt.424 Tests load and unload order of MCScriptDefinitions This is currently not working properly, see http://forum.world.st/Monticello-Bug-Preamble-of-removal-is-executed-too-la…. Fix is coming very soon! =============== Diff against Tests-mt.424 =============== Item was changed: SystemOrganization addCategory: #'Tests-Bugs'! SystemOrganization addCategory: #'Tests-Compiler'! SystemOrganization addCategory: #'Tests-Dependencies'! SystemOrganization addCategory: #'Tests-Digital Signatures'! SystemOrganization addCategory: #'Tests-Environments'! SystemOrganization addCategory: #'Tests-Exceptions'! SystemOrganization addCategory: #'Tests-FilePackage'! SystemOrganization addCategory: #'Tests-Files'! SystemOrganization addCategory: #'Tests-Finalization'! SystemOrganization addCategory: #'Tests-Hex'! SystemOrganization addCategory: #'Tests-Installer-Core'! SystemOrganization addCategory: #'Tests-Localization'! SystemOrganization addCategory: #'Tests-Monticello'! SystemOrganization addCategory: #'Tests-Monticello-Mocks'! SystemOrganization addCategory: #'Tests-Monticello-Utils'! SystemOrganization addCategory: #'Tests-Object Events'! SystemOrganization addCategory: #'Tests-ObjectsAsMethods'! SystemOrganization addCategory: #'Tests-PrimCallController'! SystemOrganization addCategory: #'Tests-Release'! SystemOrganization addCategory: #'Tests-System-Applications'! SystemOrganization addCategory: #'Tests-System-Digital Signatures'! SystemOrganization addCategory: #'Tests-System-Object Storage'! SystemOrganization addCategory: #'Tests-System-Preferences'! SystemOrganization addCategory: #'Tests-System-Support'! SystemOrganization addCategory: #'Tests-Utilities'! SystemOrganization addCategory: #'Tests-VM'! + SystemOrganization addCategory: #'Tests-MonticelloMocks'! Item was added: + ----- Method: MCPackageTest>>testLoadOrder (in category 'tests') ----- + testLoadOrder + + | snapshot loader additions | + snapshot := MCMockPackageInfo new mcPackage snapshot. + loader := MCPackageLoader new. + loader installSnapshot: snapshot. + loader analyze. + additions := loader instVarNamed: #additions. + self assert: [(additions findLast: [:ea | ea isKindOf: MCPreambleDefinition]) + < (additions findFirst: [:ea | ea isClassDefinition])]. + self assert: [(additions findFirst: [:ea | ea isKindOf: MCPostscriptDefinition]) + > (additions findLast: [:ea | ea isClassDefinition])].! Item was added: + ----- Method: MCPackageTest>>testUnloadOrder (in category 'tests') ----- + testUnloadOrder + + | package loader removals | + package := MCMockPackageInfo new mcPackage. + loader := MCPackageLoader new. + loader unloadPackage: package. + loader analyze. + removals := loader instVarNamed: #removals. + self assert: [(removals findLast: [:ea | ea isKindOf: MCRemovalPreambleDefinition]) + < (removals findFirst: [:ea | ea isClassDefinition])]. + self assert: [(removals findFirst: [:ea | ea isKindOf: MCRemovalPostscriptDefinition]) + > (removals findLast: [:ea | ea isClassDefinition])].! Item was changed: ----- Method: MCWorkingCopyRenameTest>>mockPackage (in category 'running') ----- mockPackage + ^MCPackage named: self mockCategoryName! - ^MCPackage new name: self mockCategoryName!

1 0

The Trunk: Tests-mt.435.mcz
by commits＠source.squeak.org 04 Jun '20

04 Jun '20

Marcel Taeumel uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-mt.435.mcz ==================== Summary ==================== Name: Tests-mt.435 Author: mt Time: 4 June 2020, 9:56:19.939143 am UUID: 63b4897e-3c57-0445-b94a-17aa26f33e1a Ancestors: Tests-ul.434, Tests-ct.426 Merges (still failing) tests for load/unload order of script definitions. =============== Diff against Tests-ul.434 =============== Item was changed: SystemOrganization addCategory: #'Tests-Bugs'! SystemOrganization addCategory: #'Tests-Compiler'! SystemOrganization addCategory: #'Tests-Dependencies'! SystemOrganization addCategory: #'Tests-Digital Signatures'! SystemOrganization addCategory: #'Tests-Environments'! SystemOrganization addCategory: #'Tests-Exceptions'! SystemOrganization addCategory: #'Tests-FilePackage'! SystemOrganization addCategory: #'Tests-Files'! SystemOrganization addCategory: #'Tests-Finalization'! SystemOrganization addCategory: #'Tests-Hex'! SystemOrganization addCategory: #'Tests-Installer-Core'! SystemOrganization addCategory: #'Tests-Localization'! SystemOrganization addCategory: #'Tests-Monticello'! SystemOrganization addCategory: #'Tests-Monticello-Mocks'! SystemOrganization addCategory: #'Tests-Monticello-Utils'! SystemOrganization addCategory: #'Tests-Object Events'! SystemOrganization addCategory: #'Tests-ObjectsAsMethods'! SystemOrganization addCategory: #'Tests-PrimCallController'! SystemOrganization addCategory: #'Tests-Release'! SystemOrganization addCategory: #'Tests-System-Applications'! SystemOrganization addCategory: #'Tests-System-Digital Signatures'! SystemOrganization addCategory: #'Tests-System-Object Storage'! SystemOrganization addCategory: #'Tests-System-Preferences'! SystemOrganization addCategory: #'Tests-System-Support'! SystemOrganization addCategory: #'Tests-Utilities'! SystemOrganization addCategory: #'Tests-VM'! + SystemOrganization addCategory: #'Tests-MonticelloMocks'! Item was added: + ----- Method: MCPackageTest>>testLoadOrder (in category 'tests') ----- + testLoadOrder + + | snapshot loader additions | + snapshot := MCMockPackageInfo new mcPackage snapshot. + loader := MCPackageLoader new. + loader installSnapshot: snapshot. + loader analyze. + additions := loader instVarNamed: #additions. + self assert: [(additions findLast: [:ea | ea isKindOf: MCPreambleDefinition]) + < (additions findFirst: [:ea | ea isClassDefinition])]. + self assert: [(additions findFirst: [:ea | ea isKindOf: MCPostscriptDefinition]) + > (additions findLast: [:ea | ea isClassDefinition])].! Item was added: + ----- Method: MCPackageTest>>testUnloadOrder (in category 'tests') ----- + testUnloadOrder + + | package loader removals | + package := MCMockPackageInfo new mcPackage. + loader := MCPackageLoader new. + loader unloadPackage: package. + loader analyze. + removals := loader instVarNamed: #removals. + self assert: [(removals findLast: [:ea | ea isKindOf: MCRemovalPreambleDefinition]) + < (removals findFirst: [:ea | ea isClassDefinition])]. + self assert: [(removals findFirst: [:ea | ea isKindOf: MCRemovalPostscriptDefinition]) + > (removals findLast: [:ea | ea isClassDefinition])].! Item was changed: ----- Method: MCWorkingCopyRenameTest>>mockPackage (in category 'running') ----- mockPackage + ^MCPackage named: self mockCategoryName! - ^MCPackage new name: self mockCategoryName!

1 0

The Trunk: Monticello-ct.717.mcz
by commits＠source.squeak.org 04 Jun '20

04 Jun '20

Marcel Taeumel uploaded a new version of Monticello to project The Trunk: http://source.squeak.org/trunk/Monticello-ct.717.mcz ==================== Summary ==================== Name: Monticello-ct.717 Author: ct Time: 18 April 2020, 4:43:29.411949 pm UUID: c83665a7-dbba-654c-9f87-a43916ed24a6 Ancestors: Monticello-nice.716 Fixes regression in the dependency sorter that was introduced via Monticello-ct.715. Restore the original semantics of #orderedItems, meaning to return all items that were added to the sorter. Rename (and reorder) instance variable to avoid confusion with the changed behavior of #orderedItems. Note that #orderedItems is no quick getter any more. Add some documentation. Note that I did not document the instvars 'required' and 'provided' coz I don't have an appropriate overview of them at the moment. Thanks to Jakob (jr) for the help! :-) =============== Diff against Monticello-nice.716 =============== Item was changed: ----- Method: MCDefinition>>wantsToBeOutermost (in category 'testing') ----- wantsToBeOutermost + "Outermost definitions are installed after all other definitions. In particular, this hook is crucial for the correct behavior of removal preambles. See MCDependencySorter >> #addDeferred:." ^ false! Item was changed: Object subclass: #MCDependencySorter + instanceVariableNames: 'nondeferred deferred required provided' - instanceVariableNames: 'required provided deferred orderedItems' classVariableNames: '' poolDictionaries: '' category: 'Monticello-Loading'! + + !MCDependencySorter commentStamp: 'ct 4/18/2020 16:38' prior: 0! + I sort a set of passed MCDefinitions, resolving all dependency conflicts automatically. + + To use me, first add some items to me using the building protocol or my class-side #items: selector. After that, send #orderedItems to me and I will tell you all items in a loadable order. + + Instance Variables + nondeferred: <SequenceableCollection> + Usual items that do not require special sorting mechanics. + deferred: <SequenceableCollection> + Items that are added after all nondeferred items. See MCDefinition >> #wantsToBeOutermost. + required: <Set> + provided: <Set>! Item was changed: ----- Method: MCDependencySorter class>>sortItems: (in category 'utility') ----- sortItems: aCollection | sorter | sorter := self items: aCollection. sorter externalRequirements do: [:req | sorter addProvision: req]. + ^ sorter orderedItems! - ^ sorter orderedItems.! Item was removed: - ----- Method: MCDependencySorter>>addDeferred (in category 'building') ----- - addDeferred - deferred do: [:ea | - self addToOrder: ea].! Item was changed: ----- Method: MCDependencySorter>>addDeferred: (in category 'private') ----- addDeferred: anItem + "Add an item to the derred list. Deferred items will be appended to #orderedItems after all nondeferred items. See #wantsToBeOutermost." + ^ deferred add: anItem! Item was changed: ----- Method: MCDependencySorter>>addToOrder: (in category 'private') ----- addToOrder: anItem + nondeferred add: anItem. - orderedItems add: anItem. anItem provisions do: [:ea | self addProvision: ea].! Item was changed: ----- Method: MCDependencySorter>>initialize (in category 'initialize-release') ----- initialize provided := Set new. required := Dictionary new. + nondeferred := OrderedCollection new. - orderedItems := OrderedCollection new. deferred := OrderedCollection new.! Item was changed: + ----- Method: MCDependencySorter>>orderedItems (in category 'accessing') ----- - ----- Method: MCDependencySorter>>orderedItems (in category 'sorting') ----- orderedItems + "Return all ordered items, first nondeferred items, second deferred (outermost) items." + + ^ nondeferred , deferred! - ^ orderedItems! Item was changed: ----- Method: MCPackageLoader>>sorterForItems: (in category 'private') ----- sorterForItems: aCollection | sorter | sorter := MCDependencySorter items: aCollection. sorter addExternalProvisions: self provisions. - sorter addDeferred. ^ sorter!

1 0

The Trunk: Monticello-mt.719.mcz
by commits＠source.squeak.org 04 Jun '20

04 Jun '20

Marcel Taeumel uploaded a new version of Monticello to project The Trunk: http://source.squeak.org/trunk/Monticello-mt.719.mcz ==================== Summary ==================== Name: Monticello-mt.719 Author: mt Time: 4 June 2020, 9:53:25.322143 am UUID: e0ec209e-b0cb-5642-884e-0f91bf15f893 Ancestors: Monticello-jr.718, Monticello-ct.717 Merges regression fix about script load/unload order. =============== Diff against Monticello-jr.718 =============== Item was changed: ----- Method: MCDefinition>>wantsToBeOutermost (in category 'testing') ----- wantsToBeOutermost + "Outermost definitions are installed after all other definitions. In particular, this hook is crucial for the correct behavior of removal preambles. See MCDependencySorter >> #addDeferred:." ^ false! Item was changed: Object subclass: #MCDependencySorter + instanceVariableNames: 'nondeferred deferred required provided' - instanceVariableNames: 'required provided deferred orderedItems' classVariableNames: '' poolDictionaries: '' category: 'Monticello-Loading'! + + !MCDependencySorter commentStamp: 'ct 4/18/2020 16:38' prior: 0! + I sort a set of passed MCDefinitions, resolving all dependency conflicts automatically. + + To use me, first add some items to me using the building protocol or my class-side #items: selector. After that, send #orderedItems to me and I will tell you all items in a loadable order. + + Instance Variables + nondeferred: <SequenceableCollection> + Usual items that do not require special sorting mechanics. + deferred: <SequenceableCollection> + Items that are added after all nondeferred items. See MCDefinition >> #wantsToBeOutermost. + required: <Set> + provided: <Set>! Item was changed: ----- Method: MCDependencySorter class>>sortItems: (in category 'utility') ----- sortItems: aCollection | sorter | sorter := self items: aCollection. sorter externalRequirements do: [:req | sorter addProvision: req]. + ^ sorter orderedItems! - ^ sorter orderedItems.! Item was removed: - ----- Method: MCDependencySorter>>addDeferred (in category 'building') ----- - addDeferred - deferred do: [:ea | - self addToOrder: ea].! Item was changed: ----- Method: MCDependencySorter>>addDeferred: (in category 'private') ----- addDeferred: anItem + "Add an item to the derred list. Deferred items will be appended to #orderedItems after all nondeferred items. See #wantsToBeOutermost." + ^ deferred add: anItem! Item was changed: ----- Method: MCDependencySorter>>addToOrder: (in category 'private') ----- addToOrder: anItem + nondeferred add: anItem. - orderedItems add: anItem. anItem provisions do: [:ea | self addProvision: ea].! Item was changed: ----- Method: MCDependencySorter>>initialize (in category 'initialize-release') ----- initialize provided := Set new. required := Dictionary new. + nondeferred := OrderedCollection new. - orderedItems := OrderedCollection new. deferred := OrderedCollection new.! Item was changed: + ----- Method: MCDependencySorter>>orderedItems (in category 'accessing') ----- - ----- Method: MCDependencySorter>>orderedItems (in category 'sorting') ----- orderedItems + "Return all ordered items, first nondeferred items, second deferred (outermost) items." + + ^ nondeferred , deferred! - ^ orderedItems! Item was changed: ----- Method: MCPackageLoader>>sorterForItems: (in category 'private') ----- sorterForItems: aCollection | sorter | sorter := MCDependencySorter items: aCollection. sorter addExternalProvisions: self provisions. - sorter addDeferred. ^ sorter!

1 0

The Trunk: Monticello-jr.718.mcz
by commits＠source.squeak.org 04 Jun '20

04 Jun '20

Marcel Taeumel uploaded a new version of Monticello to project The Trunk: http://source.squeak.org/trunk/Monticello-jr.718.mcz ==================== Summary ==================== Name: Monticello-jr.718 Author: jr Time: 8 May 2020, 11:12:51.901476 pm UUID: fdcc092a-2ede-dc4d-b176-7652011aaf22 Ancestors: Monticello-eem.717 Fix message not understood when "Reparent" is invoked from an MCVersionInspector. =============== Diff against Monticello-eem.717 =============== Item was added: + ----- Method: MCTool>>refresh (in category 'morphic ui') ----- + refresh + "Do nothing by default."!

1 0

The Inbox: PackageInfo-Base-jr.74.mcz
by commits＠source.squeak.org 03 Jun '20

03 Jun '20

A new version of PackageInfo-Base was added to project The Inbox: http://source.squeak.org/inbox/PackageInfo-Base-jr.74.mcz ==================== Summary ==================== Name: PackageInfo-Base-jr.74 Author: jr Time: 3 June 2020, 11:55:02.712983 pm UUID: 5c85662d-24db-244b-84fe-756d449c63c9 Ancestors: PackageInfo-Base-jr.73 Find extension methods on the metaclasses. Avoid iterating over all subclasses of ProtoObject. If we want to know what is in a package in a particular environment, then it should not also gather all the classes from other environments. This could be particularly nasty if you have two environments with different versions of the same package, which means there are classes with equal names. Not only did it pick up classes that don't belong in the package in the current environment, it also found extension methods on classes not imported in the current environment (that is: the extensions of the package with the same name in the other environment). As a side effect, this should be faster if you have a considerable amount of classes in other environments in your image. For example, a duplicated partial hierarchy of the base classes, but not with an own copy of ProtoObject... Still, environments and extension methods remain a difficult combination if you do share classes between environments. =============== Diff against PackageInfo-Base-jr.73 =============== Item was added: + ----- Method: Environment>>allReachableClassesAndTraitsDo: (in category '*PackageInfo-Base') ----- + allReachableClassesAndTraitsDo: aBlock + bindings valuesDo: + [:each | + each isBehavior ifTrue: + [aBlock value: each]]! Item was changed: ----- Method: PackageInfo>>allOverriddenMethodsDo: (in category 'enumerating') ----- allOverriddenMethodsDo: aBlock "Evaluates aBlock with all the overridden methods in the system" + ^ Environment current allReachableClassesAndTraitsDo: [:class | - ^ ProtoObject withAllSubclassesDo: [:class | self overriddenMethodsInClass: class do: aBlock] ! Item was changed: ----- Method: PackageInfo>>externalClasses (in category 'dependencies') ----- externalClasses + | myClasses environment | - | myClasses | myClasses := self classesAndMetaClasses. + environment := Environment current. ^ Array streamContents: [:s | + environment allReachableClassesAndTraitsDo: - ProtoObject withAllSubclassesDo: [:class | + (myClasses includes: class) + ifFalse: [s nextPut: class theNonMetaClass; + nextPut: class theMetaClass]]]! - (myClasses includes: class) ifFalse: [s nextPut: class]]]!

1 0

The Inbox: PackageInfo-Base-jr.73.mcz
by commits＠source.squeak.org 03 Jun '20

03 Jun '20

A new version of PackageInfo-Base was added to project The Inbox: http://source.squeak.org/inbox/PackageInfo-Base-jr.73.mcz ==================== Summary ==================== Name: PackageInfo-Base-jr.73 Author: jr Time: 3 June 2020, 11:42:40.862983 pm UUID: 32a80aa1-d50d-8248-980d-0f01ca9249da Ancestors: PackageInfo-Base-mt.72 Fix environment access in PackageInfo An Environment's organization includes only the classes declared in the environment, not the imported classes. So use #at: to find the declared classes. This makes a difference if, though imports from other environments, a declared class gets hidden by a "foreign" class. Also make sure to really look up in the organization of the current environment, so you can properly find classes and traits in other environments. Previously it would not have found classes in categories that do not exist in the default environment. =============== Diff against PackageInfo-Base-mt.72 =============== Item was changed: ----- Method: PackageInfo>>classes (in category 'listing') ----- classes | environment organization | + environment := Environment current. - environment := Environment current. organization := environment organization. ^(self systemCategories gather: [:cat | (organization listAtCategoryNamed: cat) + collect: [:className | environment at: className]]) - collect: [:className | environment valueOf: className]]) sorted: [:a :b | a className <= b className]! Item was changed: ----- Method: PackageInfo>>foreignClasses (in category 'listing') ----- foreignClasses | s environment | s := IdentitySet new. environment := Environment current. self foreignSystemCategories + do: [:c | (environment organization listAtCategoryNamed: c) - do: [:c | (SystemOrganization listAtCategoryNamed: c) do: [:cl | | cls | + cls := environment at: cl. - cls := environment valueOf: cl. s add: cls; add: cls class]]. ^ s! Item was changed: ----- Method: PackageInfo>>foreignSystemCategories (in category 'listing') ----- foreignSystemCategories + ^ Environment current organization categories - ^ SystemOrganization categories reject: [:cat | self includesSystemCategory: cat] ! Item was changed: ----- Method: PackageInfo>>includesClassNamed: (in category 'testing') ----- includesClassNamed: aClassName + ^ self includesSystemCategory: ((Environment current organization categoryOfElement: aClassName) ifNil: [^false])! - ^ self includesSystemCategory: ((SystemOrganization categoryOfElement: aClassName) ifNil: [^false])!

1 0

The Inbox: Traits-jr.313.mcz
by commits＠source.squeak.org 03 Jun '20

03 Jun '20

A new version of Traits was added to project The Inbox: http://source.squeak.org/inbox/Traits-jr.313.mcz ==================== Summary ==================== Name: Traits-jr.313 Author: jr Time: 3 June 2020, 11:31:26.724983 pm UUID: 9ae78e9a-e3da-7344-860d-e0d40818590e Ancestors: Traits-pre.312 Look up category of a Trait in the correct environment if the Trait's home is not the default environment. =============== Diff against Traits-pre.312 =============== Item was changed: ----- Method: Trait>>category (in category 'accessing') ----- category "Answer the system organization category for the receiver. First check whether the category name stored in the ivar is still correct and only if this fails look it up (latter is much more expensive)" | result | category ifNotNil: [ :symbol | + ((environment organization listAtCategoryNamed: symbol) includes: self name) - ((SystemOrganization listAtCategoryNamed: symbol) includes: self name) ifTrue: [ ^symbol ] ]. + category := (result := environment organization categoryOfElement: self name). - category := (result := SystemOrganization categoryOfElement: self name). ^result! Item was changed: ----- Method: Trait>>category: (in category 'accessing') ----- category: aString "Categorize the receiver under the system category, aString, removing it from any previous categorization." | oldCategory | oldCategory := category. aString isString ifTrue: [ category := aString asSymbol. + environment organization classify: self name under: category ] - SystemOrganization classify: self name under: category ] ifFalse: [self errorCategoryName]. SystemChangeNotifier uniqueInstance class: self recategorizedFrom: oldCategory to: category!

1 0

The Inbox: PreferenceBrowser-cbc.103.mcz
by commits＠source.squeak.org 03 Jun '20

03 Jun '20

A new version of PreferenceBrowser was added to project The Inbox: http://source.squeak.org/inbox/PreferenceBrowser-cbc.103.mcz ==================== Summary ==================== Name: PreferenceBrowser-cbc.103 Author: cbc Time: 1 June 2020, 8:47:46.016726 pm UUID: a2e0791b-c23c-9044-9d60-4ac9c13e4db0 Ancestors: PreferenceBrowser-mt.102 Fixes similar issue to mt.103, except uses the test found in PreferenceBrowser instead of creating a new text. This method may be superior, since the preference help will be localized in one location. =============== Diff against PreferenceBrowser-mt.102 =============== Item was changed: ----- Method: PreferenceWizardMorph>>initializePage04InteractionMore (in category 'initialization - pages') ----- initializePage04InteractionMore + | currentPage pane filterableHelp | - | currentPage pane | currentPage := pages add: self createPage. pane := self createScrollPane. currentPage addMorphBack: (self createLabel: 'Choose more interaction settings' color: Color white). currentPage addMorphBack: pane. + "Next line added because using 'normal' lookup does not find the right text." + filterableHelp := Preferences allPreferences + detect:[:pref | pref name = 'Filterable Lists'] + ifFound: [:pref | (pref helpString lines joinSeparatedBy: ' ') withBlanksTrimmed] + ifNone: ['']. pane scroller firstSubmorph addAllMorphsBack: { self createCheckbox: 'Windows raise on click' translated for: #WindowsRaiseOnClick help: #(window raise). self createCheckbox: 'Windows always active' for: #WindowsAlwaysActive help: #(window content active). self createCheckbox: 'Window buttons always active' translated for: #WindowButtonsAlwaysActive help: #(window control active). self createVerticalSpace. self createCheckbox: 'Smart horizontal splitters' translated for: #SmartHorizontalSplitters help: #(horizontal splitter). self createCheckbox: 'Smart vertical splitters' translated for: #SmartVerticalSplitters help: #(vertical splitter). self createVerticalSpace. + self createCheckbox: 'Filterable lists and trees' translated for: #FilterableLists help: filterableHelp. - self createCheckbox: 'Filterable lists and trees' translated for: #FilterableLists help: #(filterable). self createCheckbox: 'Filters clear if unfocused' translated for: #ClearFilterAutomatically help: #(filter clear). self createVerticalSpace. self createCheckbox: 'Attach tools to mouse' translated for: #AttachToolsToMouse help: #(tools attach). }.!

3 2

Jump to page: