rename GtFilterModelItem subclasses [feenkcom/gtoolkit#3983]

src/GToolkit-Coder-Examples/GtFilterModelExamples.class.st

@@ -34,8 +34,10 @@ GtFilterModelExamples >> itemsModel [
 	aModel
 		items: {self textModel.
 				self shortListModel.
-				self booleanModel}.
-	self assert: aModel items size equals: 3.
+				self booleanModel.
+				self invariableModel.
+				self toggleModel.}.
+	self assert: aModel items size equals: 5.
 
 	^ aModel
 ]
@@ -78,8 +80,8 @@ GtFilterModelExamples >> toggleModel [
 	aModel := GtFilterToggleModel new.
 	aModel label: 'Side'.
 	aModel
-		items: {GtFilterShortListInstanceSideItem new.
-				GtFilterShortListClassSideItem new}.
+		items: {GtFilterModelInstanceSideItem new.
+				GtFilterModelClassSideItem new}.
 	aModel selectFirstItem.
 
 	^ aModel

src/GToolkit-Coder-UI/Class.extension.st

@@ -2,5 +2,5 @@ Extension { #name : #Class }
 
 { #category : #'*GToolkit-Coder-UI' }
 Class >> asFilterModelItem [
-	^ GtFilterShortListModelClassItem new itemClass: self
+	^ GtFilterModelClassItem new itemClass: self
 ]

src/GToolkit-Coder-UI/GtFilterModelAbstractMethodItem.class.st

@@ -0,0 +1,15 @@
+Class {
+	#name : #GtFilterModelAbstractMethodItem,
+	#superclass : #GtFilterModelMethodDefinitionItem,
+	#category : #'GToolkit-Coder-UI-Filters - Models'
+}
+
+{ #category : #testing }
+GtFilterModelAbstractMethodItem >> isSubclassResponsibilityMethod [
+	^ true
+]
+
+{ #category : #accessing }
+GtFilterModelAbstractMethodItem >> label [
+	^ 'abstract'
+]

src/GToolkit-Coder-UI/GtFilterShortListModelClassItem.class.st → src/GToolkit-Coder-UI/GtFilterModelClassItem.class.st

@@ -1,5 +1,5 @@
 Class {
-	#name : #GtFilterShortListModelClassItem,
+	#name : #GtFilterModelClassItem,
 	#superclass : #GtFilterModelItem,
 	#instVars : [
 		'itemClass'
@@ -8,28 +8,28 @@ Class {
 }
 
 { #category : #accessing }
-GtFilterShortListModelClassItem >> itemClass [
+GtFilterModelClassItem >> itemClass [
 	^ itemClass
 ]
 
 { #category : #accessing }
-GtFilterShortListModelClassItem >> itemClass: anObject [
+GtFilterModelClassItem >> itemClass: anObject [
 	itemClass := anObject
 ]
 
 { #category : #accessing }
-GtFilterShortListModelClassItem >> itemSymbol [
+GtFilterModelClassItem >> itemSymbol [
 	^ self itemClass instanceSide name asSymbol
 ]
 
 { #category : #accessing }
-GtFilterShortListModelClassItem >> label [
+GtFilterModelClassItem >> label [
 	<return: #String>
 	^ self itemClass name
 ]
 
 { #category : #printing }
-GtFilterShortListModelClassItem >> printOn: aStream [
+GtFilterModelClassItem >> printOn: aStream [
 	super printOn: aStream.
 
 	aStream

src/GToolkit-Coder-UI/GtFilterModelClassOriginItem.class.st

@@ -0,0 +1,10 @@
+Class {
+	#name : #GtFilterModelClassOriginItem,
+	#superclass : #GtFilterModelMethodOriginItem,
+	#category : #'GToolkit-Coder-UI-Filters - Models'
+}
+
+{ #category : #accessing }
+GtFilterModelClassOriginItem >> label [
+	^ 'non-trait'
+]

src/GToolkit-Coder-UI/GtFilterModelClassSideItem.class.st

@@ -0,0 +1,10 @@
+Class {
+	#name : #GtFilterModelClassSideItem,
+	#superclass : #GtFilterModelSideItem,
+	#category : #'GToolkit-Coder-UI-Filters - Models'
+}
+
+{ #category : #accessing }
+GtFilterModelClassSideItem >> label [
+	^ 'class'
+]

src/GToolkit-Coder-UI/GtFilterModelDefinedMethodItem.class.st

@@ -0,0 +1,10 @@
+Class {
+	#name : #GtFilterModelDefinedMethodItem,
+	#superclass : #GtFilterModelMethodDefinitionItem,
+	#category : #'GToolkit-Coder-UI-Filters - Models'
+}
+
+{ #category : #testing }
+GtFilterModelDefinedMethodItem >> label [
+	^ 'defined'
+]

src/GToolkit-Coder-UI/GtFilterModelInstanceSideItem.class.st

@@ -0,0 +1,15 @@
+Class {
+	#name : #GtFilterModelInstanceSideItem,
+	#superclass : #GtFilterModelSideItem,
+	#category : #'GToolkit-Coder-UI-Filters - Models'
+}
+
+{ #category : #testing }
+GtFilterModelInstanceSideItem >> isInstanceSideMethod [
+	^ true
+]
+
+{ #category : #accessing }
+GtFilterModelInstanceSideItem >> label [
+	^ 'instance'
+]

src/GToolkit-Coder-UI/GtFilterShortListModelMethodDefinitionItem.class.st → src/GToolkit-Coder-UI/GtFilterModelMethodDefinitionItem.class.st

@@ -1,10 +1,10 @@
 Class {
-	#name : #GtFilterShortListModelMethodDefinitionItem,
+	#name : #GtFilterModelMethodDefinitionItem,
 	#superclass : #GtFilterModelItem,
 	#category : #'GToolkit-Coder-UI-Filters - Models'
 }
 
 { #category : #testing }
-GtFilterShortListModelMethodDefinitionItem >> isSubclassResponsibilityMethod [
+GtFilterModelMethodDefinitionItem >> isSubclassResponsibilityMethod [
 	^ false
 ]

src/GToolkit-Coder-UI/GtFilterShortListModelMethodOriginItem.class.st → src/GToolkit-Coder-UI/GtFilterModelMethodOriginItem.class.st

@@ -1,10 +1,10 @@
 Class {
-	#name : #GtFilterShortListModelMethodOriginItem,
+	#name : #GtFilterModelMethodOriginItem,
 	#superclass : #GtFilterModelItem,
 	#category : #'GToolkit-Coder-UI-Filters - Models'
 }
 
 { #category : #testing }
-GtFilterShortListModelMethodOriginItem >> isTraitOrigin [
+GtFilterModelMethodOriginItem >> isTraitOrigin [
 	^ false
 ]

src/GToolkit-Coder-UI/GtFilterShortListSideItem.class.st → src/GToolkit-Coder-UI/GtFilterModelSideItem.class.st

@@ -1,10 +1,10 @@
 Class {
-	#name : #GtFilterShortListSideItem,
+	#name : #GtFilterModelSideItem,
 	#superclass : #GtFilterModelItem,
 	#category : #'GToolkit-Coder-UI-Filters - Models'
 }
 
 { #category : #testing }
-GtFilterShortListSideItem >> isInstanceSideMethod [
+GtFilterModelSideItem >> isInstanceSideMethod [
 	^ false
 ]

src/GToolkit-Coder-UI/GtFilterShortListModelStringItem.class.st → src/GToolkit-Coder-UI/GtFilterModelStringItem.class.st

@@ -1,5 +1,5 @@
 Class {
-	#name : #GtFilterShortListModelStringItem,
+	#name : #GtFilterModelStringItem,
 	#superclass : #GtFilterModelItem,
 	#instVars : [
 		'string'
@@ -8,7 +8,7 @@ Class {
 }
 
 { #category : #comparing }
-GtFilterShortListModelStringItem >> = anObject [
+GtFilterModelStringItem >> = anObject [
 	self == anObject ifTrue: [ ^ true ].
 
 	self class = anObject class ifFalse: [ ^ false ].
@@ -17,23 +17,23 @@ GtFilterShortListModelStringItem >> = anObject [
 ]
 
 { #category : #comparing }
-GtFilterShortListModelStringItem >> hash [
+GtFilterModelStringItem >> hash [
 	^ self class hash bitXor: self string hash
 ]
 
 { #category : #accessing }
-GtFilterShortListModelStringItem >> itemValue [
+GtFilterModelStringItem >> itemValue [
 	^ self string
 ]
 
 { #category : #accessing }
-GtFilterShortListModelStringItem >> label [
+GtFilterModelStringItem >> label [
 	<return: #String or: #BlText>
 	^ self string
 ]
 
 { #category : #printing }
-GtFilterShortListModelStringItem >> printOn: aStream [
+GtFilterModelStringItem >> printOn: aStream [
 	super printOn: aStream.
 
 	aStream
@@ -43,11 +43,11 @@ GtFilterShortListModelStringItem >> printOn: aStream [
 ]
 
 { #category : #accessing }
-GtFilterShortListModelStringItem >> string [
+GtFilterModelStringItem >> string [
 	^ string
 ]
 
 { #category : #accessing }
-GtFilterShortListModelStringItem >> string: aString [
+GtFilterModelStringItem >> string: aString [
 	string := aString
 ]

src/GToolkit-Coder-UI/GtFilterModelTraitOriginItem.class.st

@@ -0,0 +1,15 @@
+Class {
+	#name : #GtFilterModelTraitOriginItem,
+	#superclass : #GtFilterModelMethodOriginItem,
+	#category : #'GToolkit-Coder-UI-Filters - Models'
+}
+
+{ #category : #testing }
+GtFilterModelTraitOriginItem >> isTraitOrigin [
+	^ true
+]
+
+{ #category : #accessing }
+GtFilterModelTraitOriginItem >> label [
+	^ 'trait'
+]

src/GToolkit-Coder-UI/String.extension.st

@@ -2,5 +2,5 @@ Extension { #name : #String }
 
 { #category : #'*GToolkit-Coder-UI' }
 String >> asFilterModelItem [
-	^ GtFilterShortListModelStringItem new string: self
+	^ GtFilterModelStringItem new string: self
 ]