The Trunk: ReleaseBuilder-ct.254.mcz

Marcel Taeumel uploaded a new version of ReleaseBuilder to project The Trunk:
http://source.squeak.org/trunk/ReleaseBuilder-ct.254.mcz

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

Name: ReleaseBuilder-ct.254
Author: ct
Time: 28 July 2026, 7:44:23.161382 pm
UUID: 54da80bf-eade-43c1-9cfe-5a09943c3168
Ancestors: ReleaseBuilder-mt.253

Harmonizes icon sizes of new pages in welcome help browser.

=============== Diff against ReleaseBuilder-mt.253 ===============

Item was changed:
  ----- Method: ReleaseBuilder class>>openWelcomeWorkspacesWith: (in category 'scripts - support') -----
  openWelcomeWorkspacesWith: balloonForm
  
  	| t browser balloon |
  	t := HelpTopic title: 'Welcome to Squeak' translated readOnlyContents: 'Please choose a topic from the left sidebar.' translated.
  
  	t subtopics
+ 		add: ((SqueakHelp asHelpTopic subtopics detect: [:ea | ea key = #introduction]) icon: (MenuIcons smallHomeIcon scaledToSize: 12 px asPoint); yourself);
+ 		add: ((SqueakReleaseNotes perform: SqueakReleaseNotes pages first) asHelpTopic title: 'What is New?' asText allBold; icon: (MenuIcons smallLanguageIcon scaledToSize: 12 px asPoint); yourself);
- 		add: ((SqueakHelp asHelpTopic subtopics detect: [:ea | ea key = #introduction]) icon: MenuIcons smallHomeIcon; yourself);
- 		add: ((SqueakReleaseNotes perform: SqueakReleaseNotes pages first) asHelpTopic title: 'What is New?' asText allBold; icon: MenuIcons smallLanguageIcon; yourself);
  		add: SqueakLicenseHelp asHelpTopic;
  		add: (SqueakProjectHelp asHelpTopic subtopics detect: [:ea | ea key = #squeakUserInterface]);
  		add: (SqueakProjectHelp asHelpTopic subtopics detect: [:ea | ea key = #workingWithSqueak]);
  		add: SqueakReleaseNotes asHelpTopic.
  	
  	"Keep topic order stable."
  	t subtopics withIndexDo: [:topic :index | topic priority: index].
  	
  	browser := HelpBrowser openOn: t.
  	browser extent: browser world extent * 0.6.
  	browser center: browser world center.
  	browser model showFirstTopic.
  	
  	balloonForm ifNil: [^ self].
  	balloon := balloonForm asMorph.
  	browser addMorphFront: balloon.
  	balloon layoutFrame: (LayoutFrame
  		fractions: (0@1 corner: 0@1)
  		offsets: (balloon width // 1.7 negated @ (balloon height * 0.9) negated corner: 0@0)).!

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