Issue 6096 in pharo: WindowsResolver sends "self default" but no method #default is implemented

Status: Accepted
Owner: [hidden email]
Labels: Type-Bug

New issue 6096 by [hidden email]: WindowsResolver sends "self  
default" but no method #default is implemented
http://code.google.com/p/pharo/issues/detail?id=6096

In WindowsResolver>>preferences there is a send of "self default"
but there is no implementation of #default.

To reproduce:
Try to open the one click image (Pharo2.0a Latest update: #20144)
on a foreign language windows (for instance german) where all the hard  
coded paths from  WindowsResolver>>preferences do not exist.

So at the end of WindowsResolver>>preferences the "self default"
is sent which gives a MNU for #default.


20 June 2012 2:56:26.289 pm

VM: Win32 - IX86 - 5.1 - CoInterpreter VMMaker-oscog-EstebanLorenzano.160  
uuid: bec8cdf0-4e06-4975-8c02-e882fadf4df3 Jun  1 2012,  
StackToRegisterMappingCogit VMMaker-oscog-EstebanLorenzano.160 uuid:  
bec8cdf0-4e06-4975-8c02-e882fadf4df3 Jun  1 2012,  
https://git.gitorious.org/cogvm/blessed.git Commit:  
2b16c2cfc16ef2e08dbc93113ce9552e810e3e78 Date: Wed May 30 16:16:27 2012  
+0200 By: Esteban Lorenzano <[hidden email]>
Image: Pharo2.0a [Latest update: #20144]

WindowsResolver(Object)>>doesNotUnderstand: #default
        Receiver: a WindowsResolver
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                next: nil

WindowsResolver>>preferences
        Receiver: a WindowsResolver
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                next: nil

WindowsResolver(FileSystemResolver)>>resolve:
        Receiver: a WindowsResolver
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                next: nil

SystemResolver(FileSystemResolver)>>unknownOrigin:
        Receiver: a SystemResolver
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                next: a WindowsResolver

SystemResolver(FileSystemResolver)>>resolve:
        Receiver: a SystemResolver
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                next: a WindowsResolver

InteractiveResolver>>unknownOrigin:
        Receiver: an InteractiveResolver
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                next: a SystemResolver
                cache: an IdentityDictionary()

[self unknownOrigin: t1] in InteractiveResolver>>resolve:
        Receiver: an InteractiveResolver
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                next: a SystemResolver
                cache: an IdentityDictionary()

IdentityDictionary(Dictionary)>>at:ifAbsent:
        Receiver: an IdentityDictionary()
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                tally: 0
                array: #(nil nil nil nil nil)

InteractiveResolver>>resolve:
        Receiver: an InteractiveResolver
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                next: a SystemResolver
                cache: an IdentityDictionary()

FileLocator>>resolve
        Receiver: <<error during printing>>
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                origin: #preferences
                path: Path * 'pharo' / 'general'

FileLocator>>exists
        Receiver: <<error during printing>>
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                origin: #preferences
                path: Path * 'pharo' / 'general'

PreferencesHandler>>lookInFolder:
        Receiver: a PreferencesHandler
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                firstLink: nil
                actions: an OrderedCollection([self lookInGeneralPreferencesFolder]  
[self lookI...etc...

PreferencesHandler>>lookInGeneralPreferencesFolder
        Receiver: a PreferencesHandler
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                firstLink: nil
                actions: an OrderedCollection([self lookInGeneralPreferencesFolder]  
[self lookI...etc...

[self lookInGeneralPreferencesFolder] in PreferencesHandler>>buildActionList
        Receiver: a PreferencesHandler
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                firstLink: nil
                actions: an OrderedCollection([self lookInGeneralPreferencesFolder]  
[self lookI...etc...

[:t2 | t2 value
                ifNotNil: [:t3 | t1 addAll: t3]] in PreferencesHandler>>perform
        Receiver: a PreferencesHandler
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                firstLink: nil
                actions: an OrderedCollection([self lookInGeneralPreferencesFolder]  
[self lookI...etc...

OrderedCollection>>do:
        Receiver: an OrderedCollection([self lookInGeneralPreferencesFolder] [self  
lookInPreferencesVersionF...etc...
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                array: an Array([self lookInGeneralPreferencesFolder] [self  
lookInPreferencesVe...etc...
                firstIndex: 1
                lastIndex: 3

PreferencesHandler>>perform
        Receiver: a PreferencesHandler
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                firstLink: nil
                actions: an OrderedCollection([self lookInGeneralPreferencesFolder]  
[self lookI...etc...

StartupLoader>>retreiveFilesStream
        Receiver: a StartupLoader
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                errors: an OrderedCollection()
                actions: a Dictionary()

StartupLoader>>loadPreferences
        Receiver: a StartupLoader
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                errors: an OrderedCollection()
                actions: a Dictionary()

StartupLoader>>loadStartupScript
        Receiver: a StartupLoader
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                errors: an OrderedCollection()
                actions: a Dictionary()

[self default loadStartupScript] in StartupLoader class>>startUp:
        Receiver: StartupLoader
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                superclass: Object
                methodDict: a MethodDictionary(#actions->(StartupLoader>>#actions "a  
CompiledMe...etc...
                format: 134
                layout: nil
                instanceVariables: #('errors' 'actions')
                organization: a ClassOrganizer
                subclasses: nil
                name: #StartupLoader
                classPool: a Dictionary(#AllowStartupScript->true #UniqueInstance->a  
StartupLoa...etc...
                sharedPools: nil
                environment: a SystemDictionary(lots of globals)
                category: #StartupPreferences
                traitComposition: {}
                localSelectors: nil

BlockClosure>>cull:
        Receiver: [self default loadStartupScript]
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                outerContext: StartupLoader class>>startUp:
                startpc: 54
                numArgs: 0

[t3 cull: t1] in [:t3 | self
                logStartUpErrorDuring: [t3 cull: t1]
                into: t2
                tryDebugger: self isInteractive] in  
SmalltalkImage>>executeDeferredStartupActions:
        Receiver: Smalltalk
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                globals: a SystemDictionary(lots of globals)
                deferredStartupActions: an OrderedCollection([UIManager default inform:  
t1] [UI...etc...
                specialObjectsArray: an Array(nil false true #Processor->Processor  
Bitmap Small...etc...

BlockClosure>>on:do:
        Receiver: [t3 cull: t1]
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                outerContext: [:t3 | self
                logStartUpErrorDuring: [t3 cull: t1]
                into: t2
                t...etc...
                startpc: 60
                numArgs: 0

SmalltalkImage>>logStartUpErrorDuring:into:tryDebugger:
        Receiver: Smalltalk
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                globals: a SystemDictionary(lots of globals)
                deferredStartupActions: an OrderedCollection([UIManager default inform:  
t1] [UI...etc...
                specialObjectsArray: an Array(nil false true #Processor->Processor  
Bitmap Small...etc...

[:t3 | self
                logStartUpErrorDuring: [t3 cull: t1]
                into: t2
                tryDebugger: self isInteractive] in  
SmalltalkImage>>executeDeferredStartupActions:
        Receiver: Smalltalk
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                globals: a SystemDictionary(lots of globals)
                deferredStartupActions: an OrderedCollection([UIManager default inform:  
t1] [UI...etc...
                specialObjectsArray: an Array(nil false true #Processor->Processor  
Bitmap Small...etc...

OrderedCollection>>do:
        Receiver: an OrderedCollection([UIManager default inform: t1] [UIManager  
default inform: t1] [UIMana...etc...
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                array: an Array([UIManager default inform: t1] [UIManager default  
inform: t1] [...etc...
                firstIndex: 1
                lastIndex: 6

SmalltalkImage>>executeDeferredStartupActions:
        Receiver: Smalltalk
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                globals: a SystemDictionary(lots of globals)
                deferredStartupActions: an OrderedCollection([UIManager default inform:  
t1] [UI...etc...
                specialObjectsArray: an Array(nil false true #Processor->Processor  
Bitmap Small...etc...

SmalltalkImage>>startupImage:snapshotWorked:
        Receiver: Smalltalk
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                globals: a SystemDictionary(lots of globals)
                deferredStartupActions: an OrderedCollection([UIManager default inform:  
t1] [UI...etc...
                specialObjectsArray: an Array(nil false true #Processor->Processor  
Bitmap Small...etc...

SmalltalkImage>>snapshot:andQuit:
        Receiver: Smalltalk
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                globals: a SystemDictionary(lots of globals)
                deferredStartupActions: an OrderedCollection([UIManager default inform:  
t1] [UI...etc...
                specialObjectsArray: an Array(nil false true #Processor->Processor  
Bitmap Small...etc...

UndefinedObject>>DoIt
        Receiver: nil
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
nil

Compiler>>evaluate:in:to:notifying:ifFail:logged:
        Receiver: a Compiler
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                sourceStream: a ReadStream
                requestor: nil
                class: UndefinedObject
                category: nil
                context: nil
                parser: a Parser

Compiler class>>evaluate:for:notifying:logged:
        Receiver: Compiler
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                superclass: Object
                methodDict: a  
MethodDictionary(#compile:in:classified:notifying:ifFail:->(Compi...etc...
                format: 142
                layout: nil
                instanceVariables:
#('sourceStream' 'requestor' 'class' 'category' 'context' 'p...etc...
                organization: a ClassOrganizer
                subclasses: nil
                name: #Compiler
                classPool: a Dictionary()
                sharedPools: nil
                environment: a SystemDictionary(lots of globals)
                category: #'Compiler-Kernel'
                traitComposition: {}
                localSelectors: nil

Compiler class>>evaluate:for:logged:
        Receiver: Compiler
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                superclass: Object
                methodDict: a  
MethodDictionary(#compile:in:classified:notifying:ifFail:->(Compi...etc...
                format: 142
                layout: nil
                instanceVariables:
#('sourceStream' 'requestor' 'class' 'category' 'context' 'p...etc...
                organization: a ClassOrganizer
                subclasses: nil
                name: #Compiler
                classPool: a Dictionary()
                sharedPools: nil
                environment: a SystemDictionary(lots of globals)
                category: #'Compiler-Kernel'
                traitComposition: {}
                localSelectors: nil

Compiler class>>evaluate:logged:
        Receiver: Compiler
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                superclass: Object
                methodDict: a  
MethodDictionary(#compile:in:classified:notifying:ifFail:->(Compi...etc...
                format: 142
                layout: nil
                instanceVariables:
#('sourceStream' 'requestor' 'class' 'category' 'context' 'p...etc...
                organization: a ClassOrganizer
                subclasses: nil
                name: #Compiler
                classPool: a Dictionary()
                sharedPools: nil
                environment: a SystemDictionary(lots of globals)
                category: #'Compiler-Kernel'
                traitComposition: {}
                localSelectors: nil

DoItDeclaration>>import
        Receiver: a DoItDeclaration("Save and Quit"
SmalltalkImage current snapshot: true andQuit: true.
)
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                contents: '"Save and Quit"
SmalltalkImage current snapshot: true andQuit: true....etc...

[:t3 | t1 := t3 import] in CodeImporter>>evaluate
        Receiver: a CodeImporter
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                readStream:
MultiByteFileStream: '/builds/jenkins/workspace/Pharo-2.0/Pharo-2.0...etc...
                codeDeclarations: an OrderedCollection(a DoItDeclaration("Preparations"
MCCache...etc...
                parserClass: ChunkFileFormatParser

OrderedCollection>>do:
        Receiver: an OrderedCollection(a DoItDeclaration("Preparations"
MCCacheRepository instVarNamed: 'def...etc...
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                array: an Array(a DoItDeclaration("Preparations"
MCCacheRepository instVarNamed...etc...
                firstIndex: 1
                lastIndex: 9

CodeImporter>>evaluate
        Receiver: a CodeImporter
        Arguments and temporary variables:
<<error during printing>
        Receiver's instance variables:
                readStream:
MultiByteFileStream: '/builds/jenkins/workspace/Pharo-2.0/Pharo-2.0...etc...
                codeDeclarations: an OrderedCollection(a DoItDeclaration("Preparations"
MCCache...etc...
                parserClass: ChunkFileFormatParser


--- The full stack ---
WindowsResolver(Object)>>doesNotUnderstand: #default
WindowsResolver>>preferences
WindowsResolver(FileSystemResolver)>>resolve:
SystemResolver(FileSystemResolver)>>unknownOrigin:
SystemResolver(FileSystemResolver)>>resolve:
InteractiveResolver>>unknownOrigin:
[self unknownOrigin: t1] in InteractiveResolver>>resolve:
IdentityDictionary(Dictionary)>>at:ifAbsent:
InteractiveResolver>>resolve:
FileLocator>>resolve
FileLocator>>exists
PreferencesHandler>>lookInFolder:
PreferencesHandler>>lookInGeneralPreferencesFolder
[self lookInGeneralPreferencesFolder] in PreferencesHandler>>buildActionList
[:t2 | t2 value
                ifNotNil: [:t3 | t1 addAll: t3]] in PreferencesHandler>>perform
OrderedCollection>>do:
PreferencesHandler>>perform
StartupLoader>>retreiveFilesStream
StartupLoader>>loadPreferences
StartupLoader>>loadStartupScript
[self default loadStartupScript] in StartupLoader class>>startUp:
BlockClosure>>cull:
[t3 cull: t1] in [:t3 | self
                logStartUpErrorDuring: [t3 cull: t1]
                into: t2
                tryDebugger: self isInteractive] in  
SmalltalkImage>>executeDeferredStartupActions:
BlockClosure>>on:do:
SmalltalkImage>>logStartUpErrorDuring:into:tryDebugger:
[:t3 | self
                logStartUpErrorDuring: [t3 cull: t1]
                into: t2
                tryDebugger: self isInteractive] in  
SmalltalkImage>>executeDeferredStartupActions:
OrderedCollection>>do:
SmalltalkImage>>executeDeferredStartupActions:
SmalltalkImage>>startupImage:snapshotWorked:
SmalltalkImage>>snapshot:andQuit:
UndefinedObject>>DoIt
Compiler>>evaluate:in:to:notifying:ifFail:logged:
Compiler class>>evaluate:for:notifying:logged:
Compiler class>>evaluate:for:logged:
Compiler class>>evaluate:logged:
DoItDeclaration>>import
[:t3 | t1 := t3 import] in CodeImporter>>evaluate
OrderedCollection>>do:
CodeImporter>>evaluate
  - - - - - - - - - - - - - - -
                        - - - - - - - - - - - - - - - - - -
[t2 evaluate] in BasicCodeLoader>>installSourceFile:
BlockClosure>>on:do:
BasicCodeLoader>>handleErrorsDuring:reference:
BasicCodeLoader>>installSourceFile:
[:t1 | self installSourceFile: t1] in [sourceFiles
                do: [:t1 | self installSourceFile: t1]] in  
BasicCodeLoader>>installSourceFiles
OrderedCollection>>do:
[sourceFiles
                do: [:t1 | self installSourceFile: t1]] in  
BasicCodeLoader>>installSourceFiles
BlockClosure>>ensure:
BasicCodeLoader>>installSourceFiles
BasicCodeLoader>>activate
BasicCodeLoader class(CommandLineHandler class)>>activateWith:
DefaultCommandLineHandler>>handleSubcommand
DefaultCommandLineHandler>>handleArgument:
DefaultCommandLineHandler>>activate
[self new activate] in DefaultCommandLineHandler class>>startUp:
BlockClosure>>cull:
[t3 cull: t1] in [:t3 | self
                logStartUpErrorDuring: [t3 cull: t1]
                into: t2
                tryDebugger: self isInteractive] in  
SmalltalkImage>>executeDeferredStartupActions:
BlockClosure>>on:do:
SmalltalkImage>>logStartUpErrorDuring:into:tryDebugger:
[:t3 | self
                logStartUpErrorDuring: [t3 cull: t1]
                into: t2
                tryDebugger: self isInteractive] in  
SmalltalkImage>>executeDeferredStartupActions:
OrderedCollection>>do:
SmalltalkImage>>executeDeferredStartupActions:
SmalltalkImage>>startupImage:snapshotWorked:
SmalltalkImage>>snapshot:andQuit:
[Smalltalk snapshot: true andQuit: true] in WorldState class>>saveAndQuit
BlockClosure>>ensure:
CursorWithMask(Cursor)>>showWhile:
WorldState class>>saveAndQuit
[| t3 |
(t3 := selector numArgs) = 0
                ifTrue: [target perform: selector]
                ifFalse: [t3 = arguments size
                                ifTrue: [target perform: selector withArguments: arguments]
                                ifFalse: [target
                                                perform: selector
                                                withArguments: (arguments copyWith: t1)]].
        self changed] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
BlockClosure>>ensure:
CursorWithMask(Cursor)>>showWhile:
ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
ToggleMenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
ToggleMenuItemMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuMorph(Morph)>>processEvent:using:
MenuMorph(Morph)>>processEvent:
MenuMorph>>handleFocusEvent:
[ActiveHand := self.
        ActiveEvent := t1.
        t5 := t2
                                handleFocusEvent: (t1
                                                transformedBy: (t2 transformedFrom: self))] in  
HandMorph>>sendFocusEvent:to:clear:
[t1 value] in PasteUpMorph>>becomeActiveDuring:
BlockClosure>>on:do:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[:t2 |
ActiveHand := t2.
        t2 processEvents.
        ActiveHand := nil] in WorldState>>doOneCycleNowFor:
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[[World doOneCycle.
        Processor yield.
        false] whileFalse.
        nil] in MorphicUIManager>>spawnNewProcess
[self value.
        Processor terminateActive] in BlockClosure>>newProcess





_______________________________________________
Pharo-bugtracker mailing list
[hidden email]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-bugtracker

Updates:
        Labels: Milestone-2.0

Comment #1 on issue 6096 by [hidden email]: WindowsResolver  
sends "self default" but no method #default is implemented
http://code.google.com/p/pharo/issues/detail?id=6096

(No comment was entered for this change.)


_______________________________________________
Pharo-bugtracker mailing list
[hidden email]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-bugtracker

Updates:
        Status: FixToInclude

Comment #2 on issue 6096 by [hidden email]: WindowsResolver  
sends "self default" but no method #default is implemented
http://code.google.com/p/pharo/issues/detail?id=6096

in  
SLICE-Issue-6096-WindowsResolver-sends-quotself-defaultquot-but-no-method-default-is-implemented--EstebanLorenzano.1


_______________________________________________
Pharo-bugtracker mailing list
[hidden email]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-bugtracker

Updates:
        Status: Integrated

Comment #3 on issue 6096 by [hidden email]: WindowsResolver  
sends "self default" but no method #default is implemented
http://code.google.com/p/pharo/issues/detail?id=6096

in 20149


_______________________________________________
Pharo-bugtracker mailing list
[hidden email]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-bugtracker