The Trunk: SMLoader-ct.102.mcz

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

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

Name: SMLoader-ct.102
Author: ct
Time: 6 July 2026, 3:16:29.511644 am
UUID: 697b7539-8644-4381-af47-94424d979412
Ancestors: SMLoader-tpr.101

Moves an extension method from SqueakMap that is needed by FileList2 itself to the original Tools package.

=============== Diff against SMLoader-tpr.101 ===============

Item was removed:
- ----- Method: FileList2 class>>morphicViewOnDirectory: (in category '*smloader-extension') -----
- morphicViewOnDirectory: aFileDirectory
- 	| aFileList window fileListBottom midLine fileListTopOffset buttonPane |
- 
- 	aFileList := self new directory: aFileDirectory.
- 	window := (SystemWindow labelled: aFileDirectory pathName) model: aFileList.
- 
- 	fileListTopOffset := (TextStyle defaultFont pointSize * 2) + 14 px.
- 	fileListBottom := 0.4.
- 	midLine := 0.4.
- 	buttonPane := aFileList optionalButtonRow addMorph:
- 		(aFileList morphicPatternPane vResizing: #spaceFill; yourself).
- 	self addFullPanesTo: window from: {
- 		{buttonPane. 0@0 corner: 1@0. 0@0 corner: 0@fileListTopOffset}.
- 		{aFileList morphicDirectoryTreePane. 0@0 corner: midLine@fileListBottom. 
- 					0@fileListTopOffset corner: 0@0}.
- 		{aFileList morphicFileListPane. midLine @ 0 corner: 1@fileListBottom. 
- 					0@fileListTopOffset corner: 0@0}.
- 		{aFileList morphicFileContentsPane. 0@fileListBottom corner: 1@1. nil}.
- 	}.
- 	aFileList postOpen.
- 	^ window !

Squeak-dev mailing list -- [email protected]
To unsubscribe send an email to [email protected]