[squeak-dev] The Trunk: SmallLand-ColorTheme-fbs.2.mcz
commits at source.squeak.org
commits at source.squeak.org
Thu May 2 08:42:21 UTC 2013
Frank Shearar uploaded a new version of SmallLand-ColorTheme to project The Trunk:
http://source.squeak.org/trunk/SmallLand-ColorTheme-fbs.2.mcz
==================== Summary ====================
Name: SmallLand-ColorTheme-fbs.2
Author: fbs
Time: 2 May 2013, 8:40:47.295 am
UUID: 2ea9706f-9267-497f-9886-1b932794bfc7
Ancestors: SmallLand-ColorTheme-fbs.1
Move the SmallLand themes/preferences to the SmallLand-ColorTheme package.
=============== Diff against SmallLand-ColorTheme-fbs.1 ===============
Item was added:
+ ----- Method: Preferences class>>smallLand (in category '*SmallLand-ColorTheme') -----
+ smallLand
+ "Small-Land theme. It install the complete Small-Land theme
+ (Preferences, Fonts, Colors, etc)"
+ "
+ Preferences smallLand.
+ "
+ self smallLandPreferences.
+ self smallLandFonts.
+ SmallLandColorTheme current apply!
Item was added:
+ ----- Method: Preferences class>>smallLandBigFonts (in category '*SmallLand-ColorTheme') -----
+ smallLandBigFonts
+ "private - change the fonts to small-land's choices"
+
+ "
+ Preferences smallLandBigFonts.
+ "
+
+ #(
+ (setButtonFontTo: #BitstreamVeraSansMono 15)
+
+ (setListFontTo: #BitstreamVeraSans 15)
+ (setMenuFontTo: #BitstreamVeraSans 15)
+ (setSystemFontTo: #BitstreamVeraSans 15)
+
+ (setWindowTitleFontTo: #BitstreamVeraSans 15)
+
+ (setCodeFontTo: #BitstreamVeraSerif 15)
+
+ (setFlapsFontTo: #KomikaText 24)
+ (setEToysFontTo: #KomikaText 24)
+ (setHaloLabelFontTo: #KomikaText 24)
+ (setEToysTitleFontTo: #KomikaText 36)
+ )
+ do: [:triplet |
+ Preferences
+ perform: triplet first
+ with: (StrikeFont familyName: triplet second pointSize: triplet third)
+ ].
+
+ BalloonMorph setBalloonFontTo: (StrikeFont familyName: #BitstreamVeraSans pointSize: 15).
+ !
Item was added:
+ ----- Method: Preferences class>>smallLandFonts (in category '*SmallLand-ColorTheme') -----
+ smallLandFonts
+ "private - change the fonts to small-land's
+ choices"
+ "
+ Preferences smallLandFonts.
+ "
+ Preferences bigDisplay
+ ifTrue: [^ self smallLandBigFonts].
+ Preferences tinyDisplay
+ ifTrue: [^ self smallLandTinyFonts].
+ self smallLandSmallFonts!
Item was added:
+ ----- Method: Preferences class>>smallLandPreferences (in category '*SmallLand-ColorTheme') -----
+ smallLandPreferences
+ "Private - change the preferences according to small-land taste"
+
+ self setPreferencesFrom: #(
+ (haloEnclosesFullBounds true)
+ (showBoundsInHalo true)
+ (cmdGesturesEnabled false)
+ (easySelection true)
+ (abbreviatedBrowserButtons true)
+ (alternativeBrowseIt true)
+ (alwaysShowVScrollbar false)
+ (annotationPanes true)
+ (balloonHelpInMessageLists true)
+ (browseWithDragNDrop true)
+ (browseWithPrettyPrint true)
+ (classicNewMorphMenu true)
+ (collapseWindowsInPlace true)
+ (diffsWithPrettyPrint true)
+ (dragNDropWithAnimation true)
+ (duplicateControlAndAltKeys true)
+ (eToyFriendly true)
+ (extraDebuggerButtons true)
+ (extractFlashInHighestQuality true)
+ (fastDragWindowForMorphic false)
+ (includeSoundControlInNavigator true)
+ (menuKeyboardControl true)
+ (menuAppearance3d false)
+ (gradientMenu false)
+ (mouseOverForKeyboardFocus true)
+ (optionalButtons true)
+ (preserveTrash true)
+ (projectViewsInWindows true)
+ (propertySheetFromHalo true)
+ (scrollBarsNarrow true)
+ (scrollBarsOnRight true)
+ (selectiveHalos true)
+ (showDirectionForSketches true)
+ (showDirectionHandles true)
+ (slideDismissalsToTrash true)
+ (translationWithBabel true)
+ (unlimitedPaintArea true)
+ (unlimitedPaintArea true)
+
+ (menuColorFromWorld false)
+ (noviceMode true)
+ (uniqueNamesInHalos true)
+ (infiniteUndo true)
+ (useUndo true)
+ (soundStopWhenDone true)
+ ).
+
+ self setParameter: #balloonHelpDelayTime to: 100.
+ !
Item was added:
+ ----- Method: Preferences class>>smallLandSmallFonts (in category '*SmallLand-ColorTheme') -----
+ smallLandSmallFonts
+ "private - change the fonts to small-land's choices"
+
+ "
+ Preferences smallLandFonts.
+ "
+
+ #(
+ (setButtonFontTo: #BitstreamVeraSansMono 12)
+
+ (setListFontTo: #BitstreamVeraSans 12)
+ (setMenuFontTo: #BitstreamVeraSans 12)
+ (setSystemFontTo: #BitstreamVeraSans 12)
+
+ (setWindowTitleFontTo: #BitstreamVeraSans 15)
+
+ (setCodeFontTo: #BitstreamVeraSerif 12)
+
+ (setFlapsFontTo: #KomikaText 15)
+ (setEToysFontTo: #KomikaText 15)
+ (setHaloLabelFontTo: #KomikaText 15)
+ (setEToysTitleFontTo: #KomikaText 24)
+ )
+ do: [:triplet |
+ Preferences
+ perform: triplet first
+ with: (StrikeFont familyName: triplet second pointSize: triplet third)
+ ].
+
+ BalloonMorph setBalloonFontTo: (StrikeFont familyName: #BitstreamVeraSans pointSize: 12).
+ !
Item was added:
+ ----- Method: Preferences class>>smallLandTinyFonts (in category '*SmallLand-ColorTheme') -----
+ smallLandTinyFonts
+ "private - change the fonts to small-land's choices"
+
+ "
+ Preferences smallLandTinyFonts.
+ "
+
+ #(
+ (setButtonFontTo: #AccujenMono 9)
+
+ (setListFontTo: #Accujen 9)
+ (setMenuFontTo: #Accujen 9)
+ (setSystemFontTo: #Accujen 9)
+
+ (setWindowTitleFontTo: #Accujen 10)
+
+ (setCodeFontTo: #Accuny 9)
+
+ (setFlapsFontTo: #Atlanta 11)
+ (setEToysFontTo: #Atlanta 11)
+ (setHaloLabelFontTo: #Atlanta 11)
+ (setEToysTitleFontTo: #Atlanta 11)
+ )
+ do: [:triplet |
+ Preferences
+ perform: triplet first
+ with: (StrikeFont familyName: triplet second pointSize: triplet third)
+ ].
+
+ BalloonMorph setBalloonFontTo: (StrikeFont familyName: #Accujen pointSize: 9).
+ !
More information about the Squeak-dev
mailing list
|