The Trunk: System-cmm.646.mcz

> I failed to see the difference...
>
>
> 2013/12/19 <[hidden email]>
>
>> Chris Muller uploaded a new version of System to project The Trunk:
>> http://source.squeak.org/trunk/System-cmm.646.mcz
>>
>> ==================== Summary ====================
>>
>> Name: System-cmm.646
>> Author: cmm
>> Time: 19 December 2013, 2:58:37.962 pm
>> UUID: 837ae54e-53d7-41df-9daa-1e24c8c9a1c9
>> Ancestors: System-nice.645
>>
>> Another RecentMessages fix.
>>
>> =============== Diff against System-nice.645 ===============
>>
>> Item was changed:
>>   ----- Method: Preferences class>>abbreviatedBrowserButtons (in category
>> 'standard queries') -----
>>   abbreviatedBrowserButtons
>>         ^ self
>>                 valueOfFlag: #abbreviatedBrowserButtons
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>alphabeticalProjectMenu (in category
>> 'standard queries') -----
>>   alphabeticalProjectMenu
>>         ^ self
>>                 valueOfFlag: #alphabeticalProjectMenu
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>alternateHandlesLook (in category
>> 'standard queries') -----
>>   alternateHandlesLook
>>         ^ self
>>                 valueOfFlag: #alternateHandlesLook
>> +               ifAbsent: [ true ]!
>> -               ifAbsent: [true]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>alternativeBrowseIt (in category
>> 'standard queries') -----
>>   alternativeBrowseIt
>>         ^ self
>>                 valueOfFlag: #alternativeBrowseIt
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>alternativeButtonsInScrollBars (in
>> category 'standard queries') -----
>>   alternativeButtonsInScrollBars
>>         ^ self
>>                 valueOfFlag: #alternativeButtonsInScrollBars
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>alwaysHideHScrollbar (in category
>> 'standard queries') -----
>>   alwaysHideHScrollbar
>>         ^ self
>>                 valueOfFlag: #alwaysHideHScrollbar
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>alwaysShowHScrollbar (in category
>> 'standard queries') -----
>>   alwaysShowHScrollbar
>>         ^ self
>>                 valueOfFlag: #alwaysShowHScrollbar
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>alwaysShowVScrollbar (in category
>> 'standard queries') -----
>>   alwaysShowVScrollbar
>>         ^ self
>>                 valueOfFlag: #alwaysShowVScrollbar
>> +               ifAbsent: [ true ]!
>> -               ifAbsent: [true]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>areaFillsAreTolerant (in category
>> 'standard queries') -----
>>   areaFillsAreTolerant
>>         ^ self
>>                 valueOfFlag: #areaFillsAreTolerant
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>areaFillsAreVeryTolerant (in category
>> 'standard queries') -----
>>   areaFillsAreVeryTolerant
>>         ^ self
>>                 valueOfFlag: #areaFillsAreVeryTolerant
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>automaticFlapLayout (in category
>> 'standard queries') -----
>>   automaticFlapLayout
>>         ^ self
>>                 valueOfFlag: #automaticFlapLayout
>> +               ifAbsent: [ true ]!
>> -               ifAbsent: [true]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>automaticKeyGeneration (in category
>> 'standard queries') -----
>>   automaticKeyGeneration
>>         ^ self
>>                 valueOfFlag: #automaticKeyGeneration
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>automaticPlatformSettings (in category
>> 'standard queries') -----
>>   automaticPlatformSettings
>>         ^ self
>>                 valueOfFlag: #automaticPlatformSettings
>> +               ifAbsent: [ true ]!
>> -               ifAbsent: [true]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>automaticViewerPlacement (in category
>> 'standard queries') -----
>>   automaticViewerPlacement
>>         ^ self
>>                 valueOfFlag: #automaticViewerPlacement
>> +               ifAbsent: [ true ]!
>> -               ifAbsent: [true]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>balloonHelpEnabled (in category
>> 'standard queries') -----
>>   balloonHelpEnabled
>>         ^ self
>>                 valueOfFlag: #balloonHelpEnabled
>> +               ifAbsent: [ true ]!
>> -               ifAbsent: [true]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>balloonHelpInMessageLists (in category
>> 'standard queries') -----
>>   balloonHelpInMessageLists
>>         ^ self
>>                 valueOfFlag: #balloonHelpInMessageLists
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>batchPenTrails (in category 'standard
>> queries') -----
>>   batchPenTrails
>>         ^ self
>>                 valueOfFlag: #batchPenTrails
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>bigDisplay (in category 'standard
>> queries') -----
>>   bigDisplay
>>         ^ self
>>                 valueOfFlag: #bigDisplay
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>biggerHandles (in category 'standard
>> queries') -----
>>   biggerHandles
>>         ^ self
>>                 valueOfFlag: #biggerHandles
>> +               ifAbsent: [ true ]!
>> -               ifAbsent: [true]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>browseWithDragNDrop (in category
>> 'standard queries') -----
>>   browseWithDragNDrop
>>         ^ self
>>                 valueOfFlag: #browseWithDragNDrop
>> +               ifAbsent: [ true ]!
>> -               ifAbsent: [true]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>browseWithPrettyPrint (in category
>> 'standard queries') -----
>>   browseWithPrettyPrint
>>         ^ self
>>                 valueOfFlag: #browseWithPrettyPrint
>> +               ifAbsent: [ false ]!
>> -               ifAbsent: [false]!
>>
>> Item was changed:
>>   ----- Method: Preferences class>>capitalizedReferences (in category
>> 'standard queries') -----
>>   capitalizedReferences
>>         ^ self
>>                 valueOfFlag: #capitalizedReferences
>> +               ifAbsent: [ true ]!
>> -               ifAbsent: [true]!
>>
>> Item was changed:
>>   ----- Method: RecentMessages>>event: (in category 'change logging')
>> -----
>> + event: anEvent
>> - event: anEvent
>>         "Hook for SystemChangeNotifier"
>> +       (anEvent isCommented and: [ anEvent itemKind =
>> SystemChangeNotifier classKind ]) ifTrue:
>> +               [ self
>> +                       recordSelector: #Comment
>> +                       forClass: anEvent item
>> +                       inEnvironment: anEvent itemEnvironment ].
>> +       ((anEvent isAdded or: [ anEvent isModified ]) and: [ anEvent
>> itemKind = SystemChangeNotifier methodKind ]) ifTrue:
>> +               [ anEvent itemRequestor ifNotNil:
>> +                       [ self
>> +                               recordSelector: anEvent itemSelector
>> +                               forClass: anEvent itemClass
>> +                               inEnvironment: anEvent itemEnvironment ].
>> +               InMidstOfFileinNotification signal ifFalse: [ Utilities
>> changed: #recentMethodSubmissions ] ]!
>> -
>> -       (anEvent isCommented and: [anEvent itemKind = SystemChangeNotifier
>> classKind])
>> -               ifTrue: [self recordSelector: #Comment forClass: anEvent
>> item inEnvironment: anEvent environment].
>> -       ((anEvent isAdded or: [anEvent isModified]) and: [anEvent itemKind
>> = SystemChangeNotifier methodKind])
>> -               ifTrue: [
>> -                       anEvent itemRequestor
>> -                               ifNotNil: [self recordSelector: anEvent
>> itemSelector forClass: anEvent itemClass inEnvironment: anEvent
>> itemEnvironment].
>> -                       InMidstOfFileinNotification signal
>> -                               ifFalse: [Utilities changed:
>> #recentMethodSubmissions]].!
>>
>>
>
>
>
>