BUG] The attached walckback raise when you drag and drop a .cs file on 7032 image

Lic. Edgar J. De Cleene edgardec2001 at yahoo.com.ar
Fri May 12 10:11:31 UTC 2006


When you drag and drop a .cs file and select browse code.

I only wish confirm what any other is having the same.
I fixed with attached .st.

If any could confirm the bug and fix, I submit to mantis.

Edgar

-------------- next part --------------
MessageNotUnderstood: UndefinedObject>>saveStateOf:
12 May 2006 6:58:21 am

VM: Mac OS - a SmalltalkImage
Image: Squeak3.9alpha [latest update: #7032]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir Discovery:Users:admin:SqueakDevelop
Trusted Dir Discovery:Users:admin:SqueakDevelop
Untrusted Dir Discovery:Users:admin:Library:Preferences:Squeak:Internet:My Squeak

UndefinedObject(Object)>>doesNotUnderstand: #saveStateOf:
	Receiver: nil
	Arguments and temporary variables: 
		aMessage: 	saveStateOf: MultiByteFileStream: 'Discovery:Users:admin:SqueakDevelo...etc...
	Receiver's instance variables: 
nil

MultiByteFileStream>>peek
	Receiver: MultiByteFileStream: 'Discovery:Users:admin:SqueakDevelop:SqueakLight Ä:TEGWeb.9.cs'
	Arguments and temporary variables: 
		next: 	nil
		save: 	nil
	Receiver's instance variables: 


[] in ChangeSet class>>scanFile:from:to: {[:bar |  [file position < stopPosition]   whileTrue: [bar value: file positi...]}
	Arguments and temporary variables: 
		file: 	MultiByteFileStream: 'Discovery:Users:admin:SqueakDevelop:SqueakLight Ä:T...etc...
		startPosition: 	0
		stopPosition: 	83636
		itemPosition: 	nil
		item: 	nil
		prevChar: 	nil
		changeList: 	an OrderedCollection()
		bar: 	[] in SystemProgressMorph>>label:min:max: {[:barVal |  (barVal between: mi...etc...

[] in ProgressInitiationException>>defaultMorphicAction {[result := workBlock value: progress]}
	Arguments and temporary variables: 
		result: 	nil
		progress: 	[] in SystemProgressMorph>>label:min:max: {[:barVal |  (barVal betwee...etc...


--- The full stack ---
UndefinedObject(Object)>>doesNotUnderstand: #saveStateOf:
MultiByteFileStream>>peek
[] in ChangeSet class>>scanFile:from:to: {[:bar |  [file position < stopPosition]   whileTrue: [bar value: file positi...]}
[] in ProgressInitiationException>>defaultMorphicAction {[result := workBlock value: progress]}
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
BlockContext>>ensure:
ProgressInitiationException>>defaultMorphicAction
ProgressInitiationException>>defaultAction
UndefinedObject>>handleSignal:
ProgressInitiationException(Exception)>>signal
ProgressInitiationException>>display:at:from:to:during:
ProgressInitiationException class>>display:at:from:to:during:
ByteString(String)>>displayProgressAt:from:to:during:
ChangeSet class>>scanFile:from:to:
FilePackage>>fileInFrom:
[] in FileContentsBrowser class>>browseStream:named: {[packageDict := Dictionary new.  browser := self new.  organizer := SystemOr...]}
BlockContext>>ensure:
CursorWithMask(Cursor)>>showWhile:
FileContentsBrowser class>>browseStream:named:
FileContentsBrowser class>>browseStream:
SimpleServiceEntry>>performServiceFor:
[] in ExternalDropHandler class>>lookupServiceBasedHandler: {[:stream | theOne performServiceFor: stream]}
ExternalDropHandler>>handle:in:dropEvent:
[] in PasteUpMorph>>dropFiles: {[handler   ifNotNil: [handler     handle: stream     in: self     dropEvent:...]}
BlockContext>>ensure:
PasteUpMorph>>dropFiles:
PasteUpMorph(Morph)>>handleDropFiles:
DropFilesEvent>>sentTo:
PasteUpMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
PasteUpMorph(Morph)>>processEvent:using:
PasteUpMorph>>processEvent:using:
PasteUpMorph(Morph)>>processEvent:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendEvent:focus:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor: {[:h |  ActiveHand := h.  h processEvents.  capturingGesture := capturingGest...]}
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>spawnNewProcess {[[World doOneCycle.  Processor yield.  false] whileFalse.  nil]}
[] in BlockContext>>newProcess {[self value.  Processor terminateActive]}
-------------- next part --------------
'From Squeak3.9alpha of 4 July 2005 [latest update: #7032] on 12 May 2006 at 7:09:48 am'!

!FileContentsBrowser class methodsFor: 'instance creation' stamp: 'edc 5/12/2006 07:09'!
browseStream: aStream
aStream setConverterForCode.
	self browseStream: aStream named: aStream name! !


More information about the Squeak-dev mailing list