[squeak-dev] The Trunk: SMLoader-ct.94.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Dec 15 22:55:43 UTC 2021


Christoph Thiede uploaded a new version of SMLoader to project The Trunk:
http://source.squeak.org/trunk/SMLoader-ct.94.mcz

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

Name: SMLoader-ct.94
Author: ct
Time: 21 November 2020, 2:29:23.320822 pm
UUID: 020d7eb7-5f0c-4645-a705-a9c82cb67f7d
Ancestors: SMLoader-cmm.93

Removes deprecated and unused toolbuilder methods for SMLoaderCategoricalPlus.

=============== Diff against SMLoader-cmm.93 ===============

Item was removed:
- ----- Method: SMLoaderCategoricalPlus>>buildFancyWith: (in category 'DEPRECATED') -----
- buildFancyWith: aBuilder
- 	"Creates a variant of the window where the package pane is split between installed and uninstalled packages."
- 	| buttonBarHeight searchHeight vertDivide horizDivide |
- 	buttonBarHeight := 0.07.
- 	searchHeight := 0.07.
- 	vertDivide := 0.5.
- 	horizDivide := 0.6.
- 	builder := aBuilder.
- 	window := builder build: (builder pluggableWindowSpec new model: self;
- 				label: #label;
- 				children: (OrderedCollection new add:
- 				((self buildButtonBarWith: builder)
- 					frame: (0 @ 0 corner: 1 @ buttonBarHeight); yourself);
- 				add: ((self buildCategoriesListWith: builder)
- 					frame: (0 @ buttonBarHeight corner: vertDivide @ horizDivide); yourself);
- 				add: ((self buildSearchPaneWith: builder)
- 					frame: (vertDivide @ buttonBarHeight corner: 1 @ (buttonBarHeight + searchHeight)); yourself);
- 				add: ((self buildNotInstalledPackagesListWith: builder)
- 					frame: (vertDivide @ (buttonBarHeight + searchHeight) corner: 1 @ (horizDivide / 2)); yourself);
- 				add: ((self buildInstalledPackagesListWith: builder)
- 					frame: (vertDivide @ (horizDivide / 2) corner: 1 @ horizDivide); yourself);
- 				add: ((self buildPackagePaneWith: builder)
- 					frame: (0 @ horizDivide corner: 1 @ 1); yourself); yourself)).
- 	window on: #mouseEnter send: #paneTransition: to: window.
- 	window on: #mouseLeave send: #paneTransition: to: window.
- 	self setUpdatablePanesFrom: #(#installedPackageList #notInstalledPackageList ).
- 	currentPackageList := #notInstalled.
- 	window extent: self initialExtent.
- 	^ window!

Item was removed:
- ----- Method: SMLoaderCategoricalPlus>>buildInstalledPackagesListWith: (in category 'DEPRECATED') -----
- buildInstalledPackagesListWith: aBuilder
- 	^ aBuilder pluggableTreeSpec new model: self;
- 		 roots: #installedPackageList;
- 		 getSelectedPath: #selectedItemPath;
- 		 getSelected: #selectedItem;
- 		 setSelected: #selectedItem:;
- 		 menu: #packagesMenu:;
- 		 label: #itemLabel:;
- 		 getChildren: #itemChildren:;
- 		 hasChildren: #itemHasChildren:;
- 		 autoDeselect: true;
- 		 yourself!

Item was removed:
- ----- Method: SMLoaderCategoricalPlus>>buildNotInstalledPackagesListWith: (in category 'DEPRECATED') -----
- buildNotInstalledPackagesListWith: aBuilder
- 	^ aBuilder pluggableTreeSpec new model: self;
- 		 roots: #notInstalledPackageList;
- 		 getSelectedPath: #selectedItemPath;
- 		 getSelected: #selectedItem;
- 		 setSelected: #selectedItem:;
- 		 menu: #packagesMenu:;
- 		 label: #itemLabel:;
- 		 getChildren: #itemChildren:;
- 		 hasChildren: #itemHasChildren:;
- 		 autoDeselect: true;
- 		 yourself!



More information about the Squeak-dev mailing list