AbstractRevisionItem subclass:#ExpandableRevisionItem
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Interface-Browsers'
!


!ExpandableRevisionItem methodsFor:'accessing'!

icon

    ^nil
!

revisionString
    "return the value of the instance variable 'revision' (automatically generated)"

    ^ 'more revisions ...'





! !

!ExpandableRevisionItem methodsFor:'actions'!

recursiveToggleExpand

    self parent addAllRevisionsBefore:self


!

toggleExpand

    self parent addNewRevisionsBefore:self


! !

!ExpandableRevisionItem methodsFor:'testing'!

isExpandableRevisionItem
"
the receiver is a expandable revision item. Used for testing tree items.

<return: Boolean>
"
    ^true



! !

!ExpandableRevisionItem class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/stx/libtool/ExpandableRevisionItem.st,v 1.2 2000-01-14 15:13:02 ps Exp $'
! !