core: deselectTextMorph now knows where focus went

hpi-swa · Aug 26, 2022 · 2b4049c · 2b4049c
1 parent 27e2ffd
commit 2b4049c
Show file tree

Hide file tree

Showing 6 changed files with 7 additions and 7 deletions.
diff --git a/packages/Sandblocks-Core/SBBlock.class.st b/packages/Sandblocks-Core/SBBlock.class.st
@@ -946,7 +946,7 @@ SBBlock >> deleteCommandFor: aBlock [
 ]
 
 { #category : #callbacks }
-SBBlock >> deselectedTextMorph: aMorph [
+SBBlock >> deselectedTextMorph: aMorph for: aNewPosition [
 
 
 ]

diff --git a/packages/Sandblocks-Core/SBBlockCursor.class.st b/packages/Sandblocks-Core/SBBlockCursor.class.st
@@ -118,7 +118,7 @@ SBBlockCursor >> cursorPosition: aPosition explicitMove: aBoolean axis: aSymbol
 			cursorPosition := SBCursorNone new.
 			previousCursor ifNotNil: [:c |
 				c block ifNotNil: [c block invalidRect: c bounds].
-				c leaveIn: self editor with: self].
+				c leaveIn: self editor with: self for: aPosition].
 			cursorPosition := aPosition.
 			cursorPosition ifNotNil: [:position |
 				position enterWith: self.

diff --git a/packages/Sandblocks-Core/SBCursorInsert.class.st b/packages/Sandblocks-Core/SBCursorInsert.class.st
@@ -168,7 +168,7 @@ SBCursorInsert >> isJumpPoint [
 ]
 
 { #category : #'as yet unclassified' }
-SBCursorInsert >> leaveIn: anEditor with: aCursor [
+SBCursorInsert >> leaveIn: anEditor with: aCursor for: aNewPosition [
 
 	aCursor showLabel: nil.
 	aCursor editor suggestionMenu delete

diff --git a/packages/Sandblocks-Core/SBCursorMultiSelect.class.st b/packages/Sandblocks-Core/SBCursorMultiSelect.class.st
@@ -74,7 +74,7 @@ SBCursorMultiSelect >> isMultiSelect [
 ]
 
 { #category : #'as yet unclassified' }
-SBCursorMultiSelect >> leaveIn: anEditor with: aCursor [
+SBCursorMultiSelect >> leaveIn: anEditor with: aCursor for: aNewPosition [
 
 	selected do: [:block | block detachDecorators: SBMultiSelectionDecorator]
 ]

diff --git a/packages/Sandblocks-Core/SBCursorPosition.class.st b/packages/Sandblocks-Core/SBCursorPosition.class.st
@@ -171,7 +171,7 @@ SBCursorPosition >> isText [
 ]
 
 { #category : #'as yet unclassified' }
-SBCursorPosition >> leaveIn: anEditor with: aCursor [
+SBCursorPosition >> leaveIn: anEditor with: aCursor for: aNewPosition [
 
 
 ]

diff --git a/packages/Sandblocks-Core/SBCursorText.class.st b/packages/Sandblocks-Core/SBCursorText.class.st
@@ -152,11 +152,11 @@ SBCursorText >> isText [
 ]
 
 { #category : #'as yet unclassified' }
-SBCursorText >> leaveIn: anEditor with: aCursor [
+SBCursorText >> leaveIn: anEditor with: aCursor for: aNewPosition [
 
 	self applyCommandIn: anEditor.
 	self textMorph stopEditing.
-	self textMorph containingSandblock deselectedTextMorph: self textMorph
+	self textMorph containingSandblock deselectedTextMorph: self textMorph for: aNewPosition
 ]
 
 { #category : #'as yet unclassified' }
-Original file line number
+Diff line change
@@ Expand Up / @@ -946,7 +946,7 @@ SBBlock >> deleteCommandFor: aBlock [ @@
     ]
     { #category : #callbacks }
-    SBBlock >> deselectedTextMorph: aMorph [
+    SBBlock >> deselectedTextMorph: aMorph for: aNewPosition [
     ]
@@ Expand Down @@