core: do not consider the editor canvas a scrollpane

hpi-swa · Sep 23, 2023 · 0c63888 · 0c63888
1 parent 49d2185
commit 0c63888
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/packages/Sandblocks-Core/SBBlock.class.st b/packages/Sandblocks-Core/SBBlock.class.st
@@ -1187,7 +1187,7 @@ SBBlock >> ensureVisible [
 		"FIXME: for insert cursors, the block bounds are not relevant but this does not belong here (assumption of selection that is not in ensureVisible)"
 		self sandblockEditor cursor mode = #insert ifFalse: [
 			self allOwnersDo: [:o |
-				(o isKindOf: ScrollPane) ifTrue: [
+				((o isKindOf: ScrollPane) and: [o ~= self sandblockEditor canvas]) ifTrue: [
 					o scrollToShow: show.
 					show := o fullBounds]]].