diff --git a/src/actions/clipboard.ts b/src/actions/clipboard.ts index 7280444a..d293e3bb 100644 --- a/src/actions/clipboard.ts +++ b/src/actions/clipboard.ts @@ -5,7 +5,6 @@ */ import { - ASTNode, ContextMenuRegistry, Gesture, ShortcutRegistry, diff --git a/src/keyboard_drag_strategy.ts b/src/keyboard_drag_strategy.ts index efdd4ffc..04a101c6 100644 --- a/src/keyboard_drag_strategy.ts +++ b/src/keyboard_drag_strategy.ts @@ -6,4 +6,12 @@ import {dragging} from 'blockly'; -export class KeyboardDragStrategy extends dragging.BlockDragStrategy {} +export class KeyboardDragStrategy extends dragging.BlockDragStrategy { + override startDrag(e?: PointerEvent) { + super.startDrag(e); + // Set position of the dragging block, so that it doesn't pop + // to the top left of the workspace. + // @ts-expect-error block and startLoc are private. + this.block.moveDuringDrag(this.startLoc); + } +}