removed call of removed method

OpenPonk · Oct 13, 2023 · 61685d2 · 61685d2
1 parent 460ab2f
commit 61685d2
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 12 deletions.
diff --git a/repository/OpenPonk-Roassal3/OPRSDraggableControlPoints.class.st b/repository/OpenPonk-Roassal3/OPRSDraggableControlPoints.class.st
@@ -18,11 +18,13 @@ OPRSDraggableControlPoints >> connectWithCanvas [
 	interaction := canvas propertyAt: OPRSSelectableCanvas ifAbsent: [
 		               line
 			               when: RSMouseLeftClick
-			               do: [ :event | self showHandles ].
+			               do: [ :event | self showHandles ]
+			               for: self.
 		               canvas
 			               when: RSMouseLeftClick
 			               do: [ :event |
-			               event shape = line ifFalse: [ self removeHandles ] ].
+			               event shape = line ifFalse: [ self removeHandles ] ]
+			               for: self.
 		               ^ self ].
 	interaction
 		when: OPRSSelectionEndEvent

diff --git a/repository/OpenPonk-Spec/OPEditor.class.st b/repository/OpenPonk-Spec/OPEditor.class.st
@@ -11,7 +11,6 @@ Class {
 		'zoomLabel',
 		'diagramController',
 		'plugin',
-		'shortcuts',
 		'canvasPresenter',
 		'canvasMenu',
 		'form',
@@ -129,7 +128,7 @@ OPEditor >> canvasPresenter [
 	^ canvasPresenter
 ]
 
-{ #category : #'as yet unclassified' }
+{ #category : #initialization }
 OPEditor >> connectPresenters [
 
 	| menu |
@@ -155,7 +154,7 @@ OPEditor >> form [
 	^ form
 ]
 
-{ #category : #'as yet unclassified' }
+{ #category : #initialization }
 OPEditor >> initializePresenters [
 
 	canvasMenu := self newMenuBar.
@@ -209,7 +208,7 @@ OPEditor >> openEmptyModel: aModel [
 	self rebuildWidget
 ]
 
-{ #category : #'as yet unclassified' }
+{ #category : #initialization }
 OPEditor >> openFormOn: aController [
 
 	form editController: aController
@@ -252,15 +251,9 @@ OPEditor >> tabDeleted [
 		diagramController diagramElement.
 	self workbench projectController removeDiagramController:
 		diagramController.
-	self unregisterShortcutsOn: self workbench.
 	diagramController removeRender
 ]
 
-{ #category : #shortcuts }
-OPEditor >> unregisterShortcutsOn: aPresenter [
-	shortcuts do: [ :pair | aPresenter removeKeyCombination: pair key ]
-]
-
 { #category : #updating }
 OPEditor >> updateUndoRedo [
 	self flag: #unused.