Setup startup iceberg binding

items := OrderedCollection new.
items add: (StartupAction name: 'Setup Pharo Iceberg Repository' code: [ | myRepoLocation |
  myRepoLocation := FileLocator home / 'Projects/Pharo/git-repos/pharo'.
	IceRepository registry
		detect: [ :e | e name = 'pharo' ]
		ifFound: [ :pharo |
			pharo 
				location: myRepoLocation;
				subdirectory: 'src' ]
]).

StartupPreferencesLoader default
	addAtStartupInPreferenceVersionFolder: items
	named: 'pharo_iceberg.st'.