'From Squeak6.0alpha of 14 October 2020 [latest update: #19988] on 14 October 2020 at 4:57:35 pm'! !CompiledCode class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:12:13.374983'! resetPreferredBytecodeSetEncoderClass PreferredBytecodeSetEncoderClass := nil.! ]style[(37 4 32 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !DateAndTime class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:12:29.477983'! resetAutomaticTimezone AutomaticTimezone := nil.! ]style[(22 3 17 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !Model class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:44:43.197983'! resetUseColorfulWindows UseColorfulWindows := nil.! ]style[(23 3 18 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !Model class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:44:02.700983'! resetWindowActiveOnFirstClick WindowActiveOnFirstClick := nil! ]style[(29 3 24 1 2 1 3)b,cblack;,c063063063,cblack;,b,cblack;,c126000000! ! !Debugger class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:47:41.946983'! fullStackSize: aNumberOrNil FullStackSize := aNumberOrNil ifNotNil: [:num | num max: self notifierStackSize].! ]style[(14 1 12 3 13 1 2 1 12 1 9 3 3 1 1 1 3 1 4 1 4 1 17 2)b,cblack;,c000000126,cblack;,c063063063,cblack;,b,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;! ! !Morph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:36:39.588983'! resetUseSoftDropShadow UseSoftDropShadow := nil.! ]style[(22 3 17 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !AbstractResizerMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:11:06.719983'! resetGripThickness GripThickness := nil.! ]style[(18 3 13 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !AbstractResizerMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:44:28.588983'! resetHandleLength HandleLength := nil.! ]style[(17 3 12 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !CornerGripMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:20:54.539983'! resetDrawCornerResizeHandles DrawCornerResizeHandles := nil.! ]style[(28 4 23 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !CornerGripMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:24:25.857983'! resetDrawEdgeResizeHandles DrawEdgeResizeHandles := nil.! ]style[(26 4 21 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !DialogWindow class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:10:09.620983'! resetGradientDialog GradientDialog := nil.! ]style[(19 3 14 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !DialogWindow class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:11:19.360983'! resetRoundedDialogCorners RoundedDialogCorners := nil.! ]style[(25 3 20 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !MenuMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:45:06.753983'! resetGradientMenu GradientMenu := nil.! ]style[(17 3 12 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !MenuMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:20:03.413983'! resetRoundedMenuCorners RoundedMenuCorners := nil.! ]style[(23 3 18 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !MorphicProject methodsFor: 'docking bars support' stamp: 'mt 10/14/2020 16:33:11.412983'! showWorldMainDockingBar: aBooleanOrNil "Change the receiver to show the main docking bar" aBooleanOrNil ifNil: [self projectPreferenceFlagDictionary removeKey: #showWorldMainDockingBar ifAbsent: []] ifNotNil: [self projectPreferenceFlagDictionary at: #showWorldMainDockingBar put: aBooleanOrNil]. self assureMainDockingBarPresenceMatchesPreference! ]style[(24 1 13 2 50 2 13 3 6 2 4 1 31 1 10 1 24 1 9 1 2 4 9 2 4 1 31 1 3 1 24 1 4 1 13 4 4 1 45)b,cblack;,c000000126,cblack;,c000126126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000126000,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126! ! !NetNameResolver class methodsFor: 'system startup' stamp: 'mt 10/14/2020 15:59:14.918983'! enableIPv6 ^EnableIPv6 ifNil: [true]! ]style[(10 3 11 1 37 3 9 1 9 3 12 1 77 3 5 1 8 3 1 10 1 6 2 4 1)b,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c000000126,cblack;,c126000000,c063063063,cblack;,c000000126,cblack;,c126000000,cblack;! ! !PasteUpMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:26:05.662983'! resetGlobalCommandKeysEnabled GlobalCommandKeysEnabled := nil.! ]style[(29 3 24 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !PluggableButtonMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:45:22.816983'! resetGradientButton GradientButton := nil.! ]style[(19 3 14 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !PluggableButtonMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:26:17.920983'! resetRoundedButtonCorners RoundedButtonCorners := nil.! ]style[(25 3 20 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !PragmaPreference methodsFor: 'initialization' stamp: 'mt 10/14/2020 16:56:24.989851'! restoreDefaultValue "Try to send a reset request to the preference provider. If the provider does not implement one, try to set the preference value to 'nil' to exploit the usual ifNil-pattern in the pragma-preference's getter. Note that this reset is silent-by-design to be as fast as possible. If you want to send out notifications, try this: self rawValue: self preferenceValue; notifyInformeeOfChange." | resetter | resetter := ('reset', getter capitalized). "e.g. #resetUseColorfulWindows" resetter := Symbol lookup: resetter. (resetter isNil or: [(provider respondsTo: resetter) not]) ifFalse: [provider perform: resetter] ifTrue: [[[self rawValue: nil] valueSupplyingAnswer: true] ifError: [Transcript show: 'Failed to reset preference: ', self]].! ]style[(19 2 391 3 1 1 8 1 1 2 8 1 2 2 7 1 8 11 3 31 2 8 1 2 8 7 1 8 4 8 1 5 1 3 1 1 1 9 11 1 8 1 1 3 1 4 8 11 8 1 8 4 7 2 1 1 4 1 9 1 3 1 1 21 1 4 1 4 8 1 1 11 5 1 30 1 1 4 1 2)b,cblack;,c000126126,cblack;,cgray;,cblack;,c106106106,cblack;,cgray;,cblack;,c106106106,cblack;,b,cblack;,c126000126n,c000000126,cblack;,c000000126,cblack;,c000126126,cblack;,c106106106,cblack;,b,cblack;,c000000126,cblack;,c106106106,cblack;,c106106106,cblack;,c000000126,cblack;,c000000126,cblack;,c000126000,c126000126,cblack;,c000000126,cblack;,c106106106,c126000126,cblack;,c000000126,c000126000,cblack;,c000000126,cblack;,c000000126,cblack;,c106106106,cblack;,c000000126,cblack;,c000126000,c126000126,c126000000,cblack;,c000000126,cblack;,c126000000,c126000126,cblack;,c000000126,cblack;,c126000000,c000126000,cblack;,c000000126,cblack;,c000126000,cblack;,c000000126,cblack;,c126000126n,c000000126,cblack;,c126000000,c000126000,cblack;! ! !PreferencesTestExample class methodsFor: 'preferences' stamp: 'mt 10/14/2020 15:37:31.678983'! booleanPref >booleanPref)' type: #Boolean> ^BooleanPref ifNil: [true]! ]style[(11 3 11 1 28 3 9 1 10 3 12 1 81 3 5 1 8 3 1 11 1 6 2 4 1)b,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c000000126,cblack;,c126000000,c063063063,cblack;,c000000126,cblack;,c126000000,cblack;! ! !PreferencesTestExample class methodsFor: 'preferences' stamp: 'mt 10/14/2020 15:37:45.054983'! colorPref >colorPref)' type: #Color> ^ColorPref ifNil: [Color green]! ]style[(9 3 11 1 26 3 9 1 10 3 12 1 76 3 5 1 6 3 1 9 1 6 8 5 1)b,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c000000126,cblack;,c126000000,c063063063,cblack;,c000000126,cblack;,c000000126,cblack;! ! !PreferencesTestExample class methodsFor: 'preferences' stamp: 'mt 10/14/2020 15:37:52.141983'! numericPref >numericPref)' type: #Number> ^NumericPref ifNil: [1234]! ]style[(11 3 11 1 28 3 9 1 10 3 12 1 80 3 5 1 7 3 1 11 1 6 2 4 1)b,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c000000126,cblack;,c126000000,c063063063,cblack;,c000000126,cblack;,c126000000,cblack;! ! !PreferencesTestExample class methodsFor: 'preferences' stamp: 'mt 10/14/2020 15:38:00.591983'! textPref >textPref)' type: #String> ^TextPref ifNil: ['Hello world']! ]style[(8 3 11 1 28 3 9 1 10 3 12 1 77 3 5 1 7 3 1 8 1 6 2 13 1)b,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c126000126n,cblack;,c000126000b,cblack;,c000000126,cblack;,c126000000,c063063063,cblack;,c000000126,cblack;,c126000126n,cblack;! ! !ProportionalSplitterMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:19:50.213983'! resetSmartHorizontalSplitters SmartHorizontalSplitters := nil.! ]style[(29 3 24 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !ProportionalSplitterMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:37:09.001983'! resetSmartVerticalSplitters SmartVerticalSplitters := nil.! ]style[(27 3 22 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !RecentMessages class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:39:01.672983'! resetNumberOfRecentSubmissionsToStore self default maximumSubmissionCount: 30.! ]style[(37 3 4 1 7 1 23 1 2 1)b,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;! ! !ReleaseBuilder class methodsFor: 'scripts' stamp: 'mt 10/14/2020 16:49:13.654983'! clearCaches "Clear caches, discard unused references, free space." "1) Explicit clean-up of FONT-related stuff." self cleanUpBitstreamVeraSans. StrikeFont initialize. "2) FIRST PHASE of explicit clean-up of CODE-related stuff." self discardUserObjects. MCFileBasedRepository flushAllCaches. "3) Now clean-up all STATE-related stuff." Preferences chooseInitialSettings. Smalltalk cleanUp: true. "4) SECOND PHASE of explicit clean-up of CODE-related stuff. As late as possible to get rid of all references before running this." Smalltalk garbageCollect. Environment allInstancesDo: [:environment | environment purgeUndeclared ]. Undeclared removeUnreferencedKeys. ! ]style[(11 2 54 3 45 2 4 1 24 14 10 4 60 2 4 1 18 25 14 4 42 14 21 13 8 1 4 5 131 12 14 15 15 3 11 1 1 1 11 1 15 16 22 5)b,cblack;,c000126126,cblack;,c000126126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000126126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000126126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000126126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;! ! !ReleaseBuilder class methodsFor: 'scripts' stamp: 'mt 10/11/2019 15:45'! setPreferences "Preferences class defaultValueTableForCurrentRelease" " Preferences outOfTheBox." "<-- uncomment after #defaultValueTableForCurrentRelease is fixed up." "General User interaction" Preferences enable: #generalizedYellowButtonMenu ; enable: #swapMouseButtons; disable: #mouseOverForKeyboardFocus. Morph indicateKeyboardFocus: true. Project uiManager openToolsAttachedToMouseCursor: false. SearchBar useScratchPad: false. HandMorph sendMouseWheelToKeyboardFocus: false. HandMorph synthesizeMouseWheelEvents: true. "Text input." TextEditor autoEnclose: true ; autoIndent: true ; encloseSelection: false ; destructiveBackWord: false ; blinkingCursor: true ; dumbbellCursor: false. PluggableTextMorph simpleFrameAdornments: false. TextMorphForEditView draggableTextSelection: true. "Windows" SystemWindow reuseWindows: false. SystemWindow windowsRaiseOnClick: true. SystemWindow windowTitleActiveOnFirstClick: true. Model windowActiveOnFirstClick: false. "Not good for little screen real estate." Model useColorfulWindows: false. Preferences disable: #fastDragWindowForMorphic. AbstractResizerMorph gripThickness: 4; handleLength: 25. CornerGripMorph drawCornerResizeHandles: false; drawEdgeResizeHandles: false. ProportionalSplitterMorph showSplitterHandles: false; smartHorizontalSplitters: false; smartVerticalSplitters: false. "Scroll bars." Preferences enable: #scrollBarsNarrow; enable: #scrollBarsOnRight; enable: #alwaysHideHScrollbar; disable: #alwaysShowHScrollbar; disable: #alwaysShowVScrollbar. ScrollBar scrollBarsWithoutArrowButtons: true; scrollBarsWithoutMenuButton: true. ScrollPane useRetractableScrollBars: false. "Rounded corners." Morph preferredCornerRadius: 8. SystemWindow roundedWindowCorners: false. DialogWindow roundedDialogCorners: false. MenuMorph roundedMenuCorners: false. PluggableButtonMorph roundedButtonCorners: false. ScrollBar roundedScrollBarLook: false. "Gradients." SystemWindow gradientWindow: false. DialogWindow gradientDialog: false. MenuMorph gradientMenu: false. PluggableButtonMorph gradientButton: false. ScrollBar gradientScrollBar: false. "Shadows" Preferences enable: #menuAppearance3d. Morph useSoftDropShadow: true. "Lists and Trees" PluggableListMorph filterableLists: true; clearFilterAutomatically: false; clearFilterDelay: 500; highlightHoveredRow: true; highlightPreSelection: false; menuRequestUpdatesSelection: true. PluggableTreeMorph filterByLabelsOnly: false; maximumSearchDepth: 1. "Standard Tools" TheWorldMainDockingBar showWorldMainDockingBar: true; showSecondsInClock: true; twentyFourHourClock: true. SearchBar useSmartSearch: true. Workspace shouldStyle: false. TranscriptStream forceUpdate: true; redirectToStdOut: false; characterLimit: 20000. Browser listClassesHierarchically: true; showClassIcons: true; showMessageIcons: true; sortMessageCategoriesAlphabetically: true. MessageSet useUnifiedMessageLabels: true. Preferences enable: #annotationPanes; enable: #optionalButtons; disable: #diffsWithPrettyPrint; enable: #traceMessages; enable: #alternativeBrowseIt; enable: #menuWithIcons; enable: #visualExplorer. Preferences disable: #debugLogTimestamp. "Halo" Preferences enable: #showBoundsInHalo ; disable: #alternateHandlesLook; disable: #showDirectionHandles. Morph haloForAll: true; metaMenuForAll: true. "System" NetNameResolver enableIPv6: false. Scanner allowUnderscoreAsAssignment: true; prefAllowUnderscoreSelectors: true. Deprecation showDeprecationWarnings: true "that's all, folks"! ! !ScrollBar class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:44:13.006983'! resetGradientScrollBar GradientScrollBar := nil.! ]style[(22 3 17 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !ScrollBar class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:28:22.835983'! resetRoundedScrollBarLook RoundedScrollBarLook := nil.! ]style[(25 3 20 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !ScrollBar class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:39:20.351983'! resetScrollBarsWithoutArrowButtons ScrollBarsWithoutArrowButtons := nil.! ]style[(34 3 29 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !ScrollBar class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:09:44.739983'! resetScrollBarsWithoutMenuButton ScrollBarsWithoutMenuButton := nil.! ]style[(32 3 27 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !ScrollPane class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:23:51.235983'! resetUseRetractableScrollBars UseRetractableScrollBars := nil.! ]style[(29 4 24 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !PluggableTextMorph class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:36:25.063983'! resetSoftLineWrap SoftLineWrap := nil.! ]style[(17 3 12 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !SugarNavigatorBar class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:27:41.363983'! resetShowHideButton ShowHideButton := nil.! ]style[(19 4 14 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !SugarNavigatorBar class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:34:04.276983'! resetShowSugarNavigator ShowSugarNavigator := nil. Smalltalk at: #TheWorldMainDockingBar ifPresent: [:class | class showWorldMainDockingBar: self showSugarNavigator not]. Project current updateLocaleDependents.! ]style[(23 4 18 1 2 1 3 15 3 1 23 3 10 3 5 1 1 1 5 1 24 1 4 1 18 1 3 12 7 1 22 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;! ! !SystemBrowser class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:46:46.006983'! resetBrowserShowsPackagePane self browserShowsPackagePane: false.! ]style[(28 3 4 1 24 1 5 1)b,cblack;,c126000000,cblack;,c000000126,cblack;,c126000000,cblack;! ! !SystemWindow class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:25:34.057983'! resetClickOnLabelToEdit ClickOnLabelToEdit := nil.! ]style[(23 3 18 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !SystemWindow class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:45:40.907983'! resetDoubleClickOnLabelToExpand DoubleClickOnLabelToExpand := nil.! ]style[(31 3 26 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !SystemWindow class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:24:15.307983'! resetGradientWindow GradientWindow := nil.! ]style[(19 3 14 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !SystemWindow class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:43:39.201983'! resetMoveMenuButtonRight self flag: #performance. "mt: Sends #refreshAllWindows" self moveMenuButtonRight: true.! ]style[(24 3 4 1 5 1 12 2 30 2 4 1 20 1 4 1)b,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000126126,cblack;,c126000000,cblack;,c000000126,cblack;,c126000000,cblack;! ! !SystemWindow class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:12:46.166983'! resetRoundedWindowCorners RoundedWindowCorners := nil.! ]style[(25 3 20 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !SystemWindow class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:09:55.650983'! resetWindowTitleActiveOnFirstClick WindowTitleActiveOnFirstClick := nil.! ]style[(34 2 29 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !TextMorphForEditView class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:20:45.700983'! resetDraggableTextSelection DraggableTextSelection := nil.! ]style[(27 3 22 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !TheWorldMainDockingBar class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:40:38.546983'! resetShowSecondsInClock ShowSecondsInClock := nil.! ]style[(23 3 18 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !TheWorldMainDockingBar class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:21:11.117983'! resetTwentyFourHourClock TwentyFourHourClock := nil.! ]style[(24 3 19 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! !TheWorldMainDockingBar class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:18:48.304983'! setMenuPreference: aPreferenceSymbol to: aBooleanOrNil | project | (project := Project current) isMorphic ifTrue: [ aBooleanOrNil ifNil: [ "Reset to default value." project projectPreferenceFlagDictionary removeKey: aPreferenceSymbol ifAbsent: []. (Preferences preferenceAt: aPreferenceSymbol) restoreDefaultValue] ifNotNil: [ project projectPreferenceFlagDictionary at: aPreferenceSymbol put: aBooleanOrNil]. (aBooleanOrNil ~= (Preferences preferenceAt: aPreferenceSymbol)) ifTrue: [Preferences setPreference: aPreferenceSymbol toValue: aBooleanOrNil]]. self updateInstances.! ]style[(18 1 17 1 3 1 13 2 1 1 7 1 1 3 7 1 2 9 7 2 9 1 7 5 13 4 6 1 1 5 25 5 7 1 31 1 10 1 17 1 9 1 2 6 1 12 13 1 17 1 1 19 1 4 9 1 1 5 7 1 31 1 3 1 17 2 4 1 13 1 6 1 13 1 2 1 1 12 13 1 17 1 1 6 7 1 1 12 14 1 17 1 8 1 13 1 4 4 1 15 1)b,cblack;,c000000126,cblack;,b,cblack;,c000000126,cblack;,cgray;,cblack;,c106106106,cblack;,cgray;,cblack;,c106106106,cblack;,b,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000126000,cblack;,c000126126,cblack;,c106106106,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000126,cblack;,c126000126,cblack;,c000000126,cblack;,c000000126,c126000126,cblack;,c000000126,c000126000,cblack;,c000000126,cblack;,c000126000,cblack;,c106106106,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,c000126000,cblack;,c000126000,c000000126,cblack;,c000000126,cblack;,c126000126,cblack;,c000000126,cblack;,c000000126,c126000126,c000126000,cblack;,c000000126,cblack;,c000126000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,c000126000,cblack;,c126000000,cblack;,c000000126,cblack;! ! !TranscriptStream class methodsFor: 'preferences' stamp: 'mt 10/14/2020 16:28:01.534983'! resetRedirectToStdOut RedirectToStdOut := nil.! ]style[(21 4 16 1 2 1 3 1)b,cblack;,c063063063,cblack;,b,cblack;,c126000000,cblack;! ! PreferencesTestExample class removeSelector: #initialize!