Sean P. DeNigris wrote
Please someone take <<5 min to review this fix
Here's another easy one:
Issue 6305: StartupPreferences "run once" broken
Status: FixReviewNeeded
Type-Bug
Milestone-1.4
Pharo1.4
Latest update: #14451
Fix in inbox: SLICE-Issue-6305-StartupPreferences-run-once-broken-SeanDeNigris.1
Port StartupAction>>execute from Pharo 2.0, which seems to be working.
Manually tested in 1.4 with:
| item1 item2 |
item1 := StartupAction name: 'Open Help' code: 'Workspace openContents: ''Here is just an example of how to use the StartupLoader.
I should only be displayed once.
You can also see StartupLoader class>>#example'' label: ''Help''' runOnce: true.
item2 := StartupAction name: 'Open Workspace' code: [ Workspace openContents: 'I should be displayed each time' ].
" StartupLoader default addAtStartup: {item1. item2}."
FileLocator imageDirectory ensureDirectory / StartupLoader default startupScriptName fileStreamDo: [ :str |
str nextPutAll: (StartupLoader default buildStreamFor: {item1. item2}) ].
StartupLoader default loadStartupScript.
StartupLoader default loadStartupScript.
Cheers,
Sean