Integration of 2 new visualization options

src/Molecule-IDE/MolImplementations.class.st

@@ -1,6 +1,6 @@
 Class {
 	#name : #MolImplementations,
-	#superclass : #MolOptions,
+	#superclass : #MolOptionsPresenter,
 	#instVars : [
 		'selectedType'
 	],
@@ -41,7 +41,7 @@ MolImplementations >> initializePresenters [
 
 	super initializePresenters.
 
-	implementationList := SpFilteringListDoubleClickPresenter new.
+	implementationList := MolSpFilteringListDoubleClickPresenter new.
 	implementationList displayIcon: [ :elem |
 		self iconNamed: elem systemIconName ]
 ]

src/Molecule-IDE/MolInterfaces.class.st

@@ -1,6 +1,6 @@
 Class {
 	#name : #MolInterfaces,
-	#superclass : #MolOptions,
+	#superclass : #MolOptionsPresenter,
 	#instVars : [
 		'selectedInterface',
 		'requiredList',
@@ -261,12 +261,12 @@ MolInterfaces >> initializePresenters [
 		            addItemLabeled: 'Required XOR Offered'
 		            do: [ self xorMode ].
 
-	requiredList := SpFilteringListDoubleClickPresenter new.
+	requiredList := MolSpFilteringListDoubleClickPresenter new.
 	requiredList
 		displayIcon: [ :elem | self iconNamed: elem systemIconName ];
 		contextMenu: [ self listMenu ].
 
-	offeredList := SpFilteringListDoubleClickPresenter new.
+	offeredList := MolSpFilteringListDoubleClickPresenter new.
 	offeredList
 		displayIcon: [ :elem | self iconNamed: elem systemIconName ];
 		contextMenu: [ self listMenu ]

src/Molecule-IDE/MolOptions.class.st → src/Molecule-IDE/MolOptionsPresenter.class.st

@@ -1,5 +1,5 @@
 Class {
-	#name : #MolOptions,
+	#name : #MolOptionsPresenter,
 	#superclass : #SpPresenter,
 	#instVars : [
 		'implementationList',
@@ -11,25 +11,25 @@ Class {
 }
 
 { #category : #tests }
-MolOptions >> buttonBrowse [
+MolOptionsPresenter >> buttonBrowse [
 	"used for test purposes"
 
 	^ buttonBrowse
 ]
 
 { #category : #tests }
-MolOptions >> buttonBrowseAction [ 
+MolOptionsPresenter >> buttonBrowseAction [ 
 ]
 
 { #category : #tests }
-MolOptions >> implementationList [
+MolOptionsPresenter >> implementationList [
 	"used for test purposes"
 
 	^ implementationList
 ]
 
 { #category : #tests }
-MolOptions >> initializePresenters [
+MolOptionsPresenter >> initializePresenters [
 	"buttons"
 
 	buttonBrowse := self newButton
@@ -55,7 +55,7 @@ MolOptions >> initializePresenters [
 ]
 
 { #category : #tests }
-MolOptions >> listImplementations: selectedClass [
+MolOptionsPresenter >> listImplementations: selectedClass [
 	"necessary to use a Collection or one of its subclasses (Array in this case) to retrieve implementations of the selected Type Trait"
 
 	(selectedClass = '' or: selectedClass = OrderedCollection new)

src/Molecule-IDE/SpFilteringListDoubleClickPresenter.class.st → src/Molecule-IDE/MolSpFilteringListDoubleClickPresenter.class.st

@@ -1,18 +1,18 @@
 Class {
-	#name : #SpFilteringListDoubleClickPresenter,
+	#name : #MolSpFilteringListDoubleClickPresenter,
 	#superclass : #SpFilteringListPresenter,
 	#category : #'Molecule-IDE-Tools'
 }
 
 { #category : #simulation }
-SpFilteringListDoubleClickPresenter >> connectPresenters [
+MolSpFilteringListDoubleClickPresenter >> connectPresenters [
 
 	super connectPresenters.
 	self doubleClickActivated
 ]
 
 { #category : #simulation }
-SpFilteringListDoubleClickPresenter >> doubleClickActivated [
+MolSpFilteringListDoubleClickPresenter >> doubleClickActivated [
 	"activates the Browse functionality by double-clicking an element"
 
 	| item |
@@ -22,7 +22,7 @@ SpFilteringListDoubleClickPresenter >> doubleClickActivated [
 ]
 
 { #category : #simulation }
-SpFilteringListDoubleClickPresenter >> initializePresenters [
+MolSpFilteringListDoubleClickPresenter >> initializePresenters [
 	"changes the original 'Filter...' placeholder text to 'Hit return to accept'"
 
 	super initializePresenters.