Merge pull request #1417 from MarcusDenker/DeadCode-Clean-01-07

remove more unsent methods that send non-existing selectors.
pharo-spec · Aug 3, 2023 · 30a040e · 30a040e
2 parents 505c463 + 783a538
commit 30a040e
Show file tree

Hide file tree

Showing 5 changed files with 0 additions and 33 deletions.
diff --git a/src/Spec2-Core/SpAbstractTextPresenter.class.st b/src/Spec2-Core/SpAbstractTextPresenter.class.st
@@ -348,14 +348,6 @@ SpAbstractTextPresenter >> wantsVisualFeedback: aBoolean [
 	wantsVisualFeedback := aBoolean
 ]
 
-{ #category : #TOREMOVE }
-SpAbstractTextPresenter >> whenAboutToStyleChangedDo: aBlock [
-	"Set a block to perform when the about to style block changed"
-
-	self whenAboutToStyleBlockChanged: [:block :old :announcement :anAnnouncer | 
-		aBlock cull: (block value) cull: old cull: announcement cull: anAnnouncer ]
-]
-
 { #category : #TOREMOVE }
 SpAbstractTextPresenter >> whenAcceptBlockChangedDo: aBlock [
 	"Set a block to perform when the accept block changed"

diff --git a/src/Spec2-Core/SpAbstractTreeFilter.class.st b/src/Spec2-Core/SpAbstractTreeFilter.class.st
@@ -7,9 +7,3 @@ Class {
 	#superclass : #Object,
 	#category : #'Spec2-Core-Support'
 }
-
-{ #category : #filtering }
-SpAbstractTreeFilter >> keepTreeNode: aNode [
-
-	^ false
-]
diff --git a/src/Spec2-Core/SpMenuPresenter.class.st b/src/Spec2-Core/SpMenuPresenter.class.st
@@ -189,12 +189,6 @@ SpMenuPresenter >> menuGroups [
 	^ groups
 ]
 
-{ #category : #TOREMOVE }
-SpMenuPresenter >> neglect: aModel [
-
-	aModel neglectMenuModel: self
-]
-
 { #category : #api }
 SpMenuPresenter >> openWithSpecAt: aPosition [
 	"Open this menu at `aPosition`. 

diff --git a/src/Spec2-Core/SpTokenTreeFilter.class.st b/src/Spec2-Core/SpTokenTreeFilter.class.st
@@ -27,12 +27,6 @@ SpTokenTreeFilter >> initialize [
 	token := ''.
 ]
 
-{ #category : #filtering }
-SpTokenTreeFilter >> keepTreeNode: aNode [
-
-	^ aNode matchTokenFilter: self
-]
-
 { #category : #accessing }
 SpTokenTreeFilter >> token [
 

diff --git a/src/Spec2-Morphic/SpWorldPresenter.class.st b/src/Spec2-Morphic/SpWorldPresenter.class.st
@@ -46,13 +46,6 @@ SpWorldPresenter >> defaultInitialExtent [
 	^ self currentWorld extent
 ]
 
-{ #category : #api }
-SpWorldPresenter >> ensureExtentFor: aWidget [
-
-	self extent ifNotNil: [ :ext | DisplayScreen hostWindowSize: ext ].
-	self initialExtent ifNotNil: [ :ext | DisplayScreen hostWindowSize: ext ].
-]
-
 { #category : #api }
 SpWorldPresenter >> isDisplayed [