# HG changeset patch
# User ps
# Date 947847024 -3600
# Node ID 7a3c8ee206673b00511e7106cb62912672144100
# Parent  100042c9183eceec11ccf1000a3f5903108c6e45
removed via FileBrowser

diff -r 100042c9183e -r 7a3c8ee20667 AbstractRevisionItem.st
--- a/AbstractRevisionItem.st	Fri Jan 14 11:49:28 2000 +0100
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,105 +0,0 @@
-AbstractVersionDiffBrowserItem subclass:#AbstractRevisionItem
-	instanceVariableNames:'revision'
-	classVariableNames:''
-	poolDictionaries:''
-	category:'Interface-Browsers'
-!
-
-
-!AbstractRevisionItem class methodsFor:'instance creation'!
-
-newForRevision:aRevision
-
-    |theRevision|
-
-    theRevision := self new.
-    theRevision revision:aRevision.
-    ^theRevision
-! !
-
-!AbstractRevisionItem methodsFor:'accessing'!
-
-myClass
-
-    ^self parent myClass
-!
-
-revision
-    "return the value of the instance variable 'revision' (automatically generated)"
-
-    ^ revision!
-
-revision:something
-    "set the value of the instance variable 'revision' (automatically generated)"
-
-    revision := something.!
-
-revisionString
-    "return the value of the instance variable 'revision' (automatically generated)"
-
-    self subclassResponsibility
-
-! !
-
-!AbstractRevisionItem methodsFor:'protocol'!
-
-icon
-"
-define concrete icons for revision items in subclasses
-
-<return: self>
-"
-    self subclassResponsibility
-!
-
-label
-"
-label is the revision string
-
-<return: String>
-"
-
-    ^self revisionString
-
-
-! !
-
-!AbstractRevisionItem methodsFor:'testing'!
-
-hasSourceStream
-"
-has the receiver a source stream? Used for testing tree items.
-
-<return: Boolean>
-"
-    ^false
-
-!
-
-isLoadedRevision
-"
-do the receiver represents the actual revision of a class.
-
-<return: Boolean>
-"
-    ^false
-
-
-
-!
-
-isRevisionItem
-"
-the receiver is a revision item. Used for testing tree items.
-
-<return: Boolean>
-"
-    ^true
-
-! !
-
-!AbstractRevisionItem class methodsFor:'documentation'!
-
-version
-    ^ '$Header$'
-! !