core: disable history end-merge after leaving a text input as it caus…

…ed troubles with consecutive auto-applied changes
hpi-swa · Sep 30, 2023 · 7c2872e · 7c2872e
1 parent 008b33b
commit 7c2872e
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/packages/Sandblocks-Core/Morph.extension.st b/packages/Sandblocks-Core/Morph.extension.st
@@ -726,6 +726,7 @@ Morph >> storeOn: aStream [
 { #category : #'*Sandblocks-Core' }
 Morph >> submorphIndex [
 
+	self owner ifNil: [^ 1].
 	^ self owner submorphs indexOf: self
 ]
 

diff --git a/packages/Sandblocks-Core/SBCursorText.class.st b/packages/Sandblocks-Core/SBCursorText.class.st
@@ -26,7 +26,7 @@ SBCursorText >> applyCommandIn: anEditor [
 			" applying a command will cause a cursor change, however we are in the middle of a cursor change so prohibit any changes here "
 			currentCommand selectAfter: #none.
 			anEditor do: currentCommand]
-		ifFalse: [anEditor history noMoreMerge]
+		ifFalse: [SBToggledCode comment: '' active: 0 do: {[anEditor history noMoreMerge]}]
 ]
 
 { #category : #'as yet unclassified' }