My current "settings" script:
Preferences setDefaultFonts: #( (setSystemFontTo: #'Arial' 10) (setListFontTo: #'Arial' 10) (setFlapsFontTo: #'Arial' 12) (setEToysFontTo: #'Arial' 8) (setEToysTitleFontTo: #'Arial' 8) (setPaintBoxButtonFontTo: #'Arial' 10) (setMenuFontTo: #'Arial' 10) (setWindowTitleFontTo: #'Arial' 12) (setBalloonHelpFontTo: #'Arial' 8) (setCodeFontTo: #'Arial' 10) (setButtonFontTo: #'Arial' 10)); setPreference: #maintainHalos toValue: false; setPreference: #showBoundsInHalo toValue: true; setPreference: #preserveTrash toValue: false; setPreference: #alternativeButtonsInScrollBars toValue: true; setPreference: #scrollBarsWithoutMenuButton toValue: true; setPreference: #scrollBarsNarrow toValue: false; setPreference: #mouseOverForKeyboardFocus toValue: false; setPreference: #mouseClickForKeyboardFocus toValue: true; setPreference: #alwaysShowVScrollbar toValue: false; setPreference: #showSplitterHandles toValue: false; setPreference: #useUndo toValue: false; setPreference: #syntaxHighlightingAsYouTypeAnsiAssignment toValue: true; setPreference: #showWorldMainDockingBar toValue: true; setPreference: #swapControlAndAltKeys toValue: true; setPreference: #swapMouseButtons toValue: true; setPreference: #mvcProjectsAllowed toValue: false; setPreference: #syntaxHighlightingAsYouTypeAnsiAssignment toValue: true; setPreference: #fastDragWindowForMorphic toValue: false; setPreference: #windowsActiveOnFirstClick toValue: true; setPreference: #noWindowAnimationForClosing toValue: true; setPreference: #externalFocusForPluggableText toValue: true; setPreference: #fadedBackgroundWindows toValue: false; setParameter: #menuColor to: (Color r: 0.782 g: 0.828 b: 0.92); textHighlightColor: (Color r: 0.595 g: 0.658 b: 0.976); insertionPointColor: (Color r: 0.595 g: 0.658 b: 0.976); addPreference: #multipleTextUndo categories: #('general') default: false balloonHelp: 'Editors track a multiple undo history'. (World findA: DockingBarMorph) ifNotNilDo: [:db | db borderWidth: 0]. (World findA: FlapTab) setToPopOutOnMouseOver: true; solidTab; width: 8; fillStyle: (TranslucentColor r: 0.638 g: 0.702 b: 0.082 alpha: 0.667). (World findA: FlapTab) referent borderWidth: 0; fillStyle: (TranslucentColor r: 0.94 g: 0.972 b: 0.73 alpha: 0.7).
Regards, Gary