Merge pull request #22 from pharo-spec/revert-15-9-remove-was-sent-to…

…-nil-when-removing-an-object-from-a-chest-with-the-tree-view-within-the-debugger Revert "fixing bugs in actions of the tree view"
pharo-spec · Jul 31, 2023 · 585de05 · 585de05
2 parents c6dd43f + 636478b
commit 585de05
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 15 deletions.
diff --git a/src/Chest/ChestTableWithContentPresenter.class.st b/src/Chest/ChestTableWithContentPresenter.class.st
@@ -722,15 +722,14 @@ ChestTableWithContentPresenter >> removeAllChests [
 { #category : #removing }
 ChestTableWithContentPresenter >> removeAllItemsFromSelectedChest [
 
-	| items chest |
+	| items |
 	self flag: 'to do with polymorphism'.
 
 	items := activePresenter == chestWithContentTreeTable
 		         ifTrue: [ 
 		         chestWithContentTreeTable childrenFor: self selectedChest ]
 		         ifFalse: [ chestContentsTable items ].
-	chest := self selectedChest.
-	items do: [ :assoc | chest remove: assoc value ]
+	items do: [ :assoc | self selectedChest remove: assoc value ]
 ]
 
 { #category : #removing }
@@ -830,7 +829,7 @@ ChestTableWithContentPresenter >> selectedChest [
 		 activePresenter == chestWithContentTreeTable ]) ifTrue: [ 
 		^ chestWithContentTreeTable selectedItem isChest
 			  ifTrue: [ chestWithContentTreeTable selectedItem ]
-			  ifFalse: [ chestWithContentTreeTable parentOfSelected ] ].
+			  ifFalse: [ nil ] ].
 	^ chestsTable selection selectedItem
 ]
 

diff --git a/src/Chest/SpTreeTablePresenter.extension.st b/src/Chest/SpTreeTablePresenter.extension.st