In the current menu bar in Pharo 7 I miss launcher icons. This is a quick ad-hoc��tweak how to add them:



MenubarMorph reset.

World menubar submorphs second delete.

World menubar addMorph: (SimpleButtonMorph new��
label: '|';
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself) after: World menubar submorphs first.

World menubar addMorph: (IconicButton new��
target: [ Smalltalk saveSession ];��
helpText: 'Save image';
labelGraphic: (self iconNamed: #smallSave);��
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself) after: World menubar submorphs first.

World menubar addMorph: (SimpleButtonMorph new��
label: '|';
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself) after: World menubar submorphs first.

World menubar addMorph: (IconicButton new��
target: [ IceTipRepositoriesBrowser�� new openWithSpec ];��
helpText: 'Iceberg';
labelGraphic: (IceTipRepositoriesBrowser icon);��
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself) after: World menubar submorphs first.
World menubar addMorph: (IconicButton new��
target: [ Smalltalk tools openTestRunner ];��
helpText: 'Test runner';
labelGraphic: ( self iconNamed: #testRunnerIcon);��
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself) after: World menubar submorphs first.

World menubar addMorph: (IconicButton new��
target: [ Smalltalk tools openWorkspace�� ];��
helpText: 'Playground';
labelGraphic: ( Smalltalk tools workspace taskbarIcon);��
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself) after: World menubar submorphs first.
World menubar addMorph: (IconicButton new��
target: [ Smalltalk tools browser open ];��
helpText: 'System browser';
labelGraphic: (self iconNamed: #nautilus);��
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself) after: World menubar submorphs first.

World menubar addMorph: (SimpleButtonMorph new��
label: '|';
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself) after: World menubar submorphs first.

World menubar addMorphBack: (SimpleButtonMorph new��
label: '|';
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself).

World menubar addMorphBack: (IconicButton new��
target: [ self inform: 'hello world' ];��
helpText: 'custom action';
labelGraphic: (self iconNamed: #glamorousGo);��
actionSelector: #value; color: Color transparent; borderWidth: 0; yourself).