How to make a GeeMailMorph live in a SystemWindow?

Doug Way dway at riskmetrics.com
Thu Feb 8 02:00:59 UTC 2001


Well, I have a fix for this, sort of.  If you comment out the "self setScrollDeltas" line in AlansTextPlusMorph>>layoutChanged, it works again, but in this case the scrollbar will not be hidden for this window.  It also may have other side effects with the scrollbar not updating properly in this window, but it seemed fine from what I could tell.

Looking at the infinite loop stack at the bottom of my previous email (from the SqueakDebug.log), it seems that ScrollPane>>showScrollBar should have caught the fact (in its first line) that it already has a scrollbar, and not tried to add it again.  But I wasn't able to get this stack to come up in the debugger with an alt-. for some reason, a different stack would come up instead:

UndefinedObject(Object)>>doesNotUnderstand:
Point>>-
NewParagraph>>displayOn:using:at:
FormCanvas>>paragraph:bounds:color:
TextPlusMorph(TextMorph)>>drawOn:
FormCanvas(Canvas)>>draw:
FormCanvas(Canvas)>>drawMorph:
[] in TextPlusMorph(Morph)>>fullDrawOn:
FormCanvas>>roundCornersOf:during:
TextPlusMorph(Morph)>>fullDrawOn:
FormCanvas(Canvas)>>fullDraw:
FormCanvas(Canvas)>>fullDrawMorph:
[] in TextPlusPasteUpMorph(Morph)>>drawSubmorphsOn:
Array(SequenceableCollection)>>reverseDo:
[] in TextPlusPasteUpMorph(Morph)>>drawSubmorphsOn:
FormCanvas>>clipBy:during:
TextPlusPasteUpMorph(Morph)>>drawSubmorphsOn:
[] in TextPlusPasteUpMorph(Morph)>>fullDrawOn:
FormCanvas>>roundCornersOf:during:
TextPlusPasteUpMorph(Morph)>>fullDrawOn:

That's as far as I got for now, anyway.

- Doug


Doug Way wrote:
> 
> Ned Konz wrote:
> >
> > On Wednesday 07 February 2001 10:42, Bob Arning wrote:
> > > On Wed, 7 Feb 2001 10:29:31 -0800 Ned Konz <ned at bike-nomad.com> wrote:
> > > >What am I missing? This blows up (on 2.9):
> > > >| geeMail window |
> > > >
> > > >geeMail _ (GeeMailMorph new) cornerStyle:  #square.
> > > >window _ (SystemWindowWithButton labelled: 'Test').
> > > >window addMorph: geeMail frame: (0 at 0 corner: 1 at 1).
> > > >window openInWorld
> > >
> > > Ned,
> > >
> > > I just tried it in 2.9 and 3.1 without anyting blowing up. Was there some
> > > further step to cause failure? What was the failure?
> >
> > The failure was a completely hung image (i.e. no alt-. action, etc.).
> >
> > Well, I have the following preferences set:
> >
> >         inboard scrollbars
> >         scrollbars on right
> >         hidden scrollbars
> >
> > Try these preferences. It looks like the key is "hidden scrollbars".
> 
> Yeah, it looks like there is some sort of infinite-loop conflict with the hidden scrollbars (see stack below)... I saw the problem in the latest 3.0 with hidden scrollbars turned on.
> 
> Interestingly, I noticed that with 3.0, the alt-. works, but in 2.9a-3278 it doesn't.  Also, having only inboard scrollbars on (but not hidden scrollbars) in 2.9a causes a problem, but seems to work okay in 3.0.  Weird.
> 
> Since I wrote the hidden scrollbars stuff, I could try to look at it tonight, if no one else figures it out before then.
> 
> - Doug Way
>   dway at riskmetrics.com
> 
> GeeMailMorph(Morph)>>privateRemoveMorph:
> GeeMailMorph(Morph)>>privateAddMorph:atIndex:
> GeeMailMorph(ScrollPane)>>showScrollBar
> GeeMailMorph(ScrollPane)>>hideOrShowScrollBar
> GeeMailMorph(ScrollPane)>>setScrollDeltas
> GeeMailMorph(AlansTextPlusMorph)>>layoutChanged
> GeeMailMorph(Morph)>>privateRemoveMorph:
> GeeMailMorph(Morph)>>privateAddMorph:atIndex:
> GeeMailMorph(ScrollPane)>>showScrollBar
> GeeMailMorph(ScrollPane)>>hideOrShowScrollBar
> GeeMailMorph(ScrollPane)>>setScrollDeltas
> GeeMailMorph(AlansTextPlusMorph)>>layoutChanged
> GeeMailMorph(Morph)>>privateRemoveMorph:





More information about the Squeak-dev mailing list