[FIX]InfoAgent Re: InfoAgent bug Re: Where is it: Bookmarks for Scampe
Karl Ramberg
karl.ramberg at chello.se
Sun Jun 11 12:46:05 UTC 2000
Mats Nygren wrote:
>
> Karl Ramberg <karl.ramberg at chello.se> wrote:
> >[snip]
> > Thanks, I actually found it but it's broken :-(
> > I'll see if I can fix it.
> > Thomas Mahler made it: Are you still out there ?
>
> I had contact with him recently. The trouble has somehtiong to do with
> 2.8a, try it instead in 2.7 that worked for me. I didnt try to unserstand the problem.
>
> /Mats
Here is a fix for the problem, I think :-)
It seems class ObjectExplorerWindow ceased to exist, so I replaced it with
SystemWindow.
Karl
-------------- next part --------------
'From Squeak2.8alpha of 19 February 2000 [latest update: #2310] on 11 June 2000 at 2:40:32 pm'!
!BookmarkExplorer methodsFor: 'as yet unclassified' stamp: 'kfr 6/11/2000 14:23'!
explorerFor: anObject caption: title
| window listMorph |
rootObject _ anObject.
(window _ SystemWindow labelled: title)
model: self;
color: Color random lighter.
window addMorph: (listMorph _ BookmarkListMorph "SimpleHierarchicalListMorph "
on: self
list: #getList
selected: #getCurrentSelection
changeSelected: #noteNewSelection:
menu: #genericMenu:
keystroke: nil)
frame: (0 at 0 corner: 1 at 1).
listMorph autoDeselect: false.
listMorph scroller submorphs copy do: [ :each |
(each canExpand and: [each isExpanded = false]) ifTrue: [
each toggleExpandedState
]].
listMorph adjustSubmorphPositions.
rootObject addDependent: listMorph.
^ window! !
More information about the Squeak-dev
mailing list
|