Posted by
Gary Chambers-4 on
Mar 02, 2008; 12:14pm
URL: https://forum.world.st/Installation-scripts-tp133937p133938.html
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
_______________________________________________
UI mailing list
[hidden email]
http://lists.squeakfoundation.org/mailman/listinfo/ui