Hi there,

this is causing a debugger to be open in the deprecated method


RFBSession>>desktopName
        "Answer the name of the desktop, constructed from the image, host and 
platform names."
        "RFBSession new desktopName"

        ^String streamContents: [:stream |
                stream
                        nextPutAll: SmalltalkImage current imageName 
asFileReference basename;
                        nextPut: $@;
                        nextPutAll: server localHostName;
                        nextPutAll: ' [';
                        nextPutAll: OSPlatform platformName; space; nextPutAll: 
OSPlatform osVersion;
                        nextPut: $].
                interactive ifFalse: [stream nextPutAll: ' - view only']]


fix:


RFBSession>>desktopName
        "Answer the name of the desktop, constructed from the image, host and 
platform names."
        "RFBSession new desktopName"

        ^String streamContents: [:stream |
                stream
                        nextPutAll: SmalltalkImage current imageName 
asFileReference basename;
                        nextPut: $@;
                        nextPutAll: server localHostName;
                        nextPutAll: ' [';
                        nextPutAll: Smalltalk os name; space; nextPutAll: 
Smalltalk os  version;
                        nextPut: $].
                interactive ifFalse: [stream nextPutAll: ' - view only']]

Reply via email to