From c39ef96548dbe6ac45d3a19acf3160e62e19fe2e Mon Sep 17 00:00:00 2001 From: Nat Quayle Nelson Date: Mon, 3 Jan 2022 12:22:32 -0700 Subject: [PATCH] better way of allowing scroll over monaco editor --- projects/kiss-vscode/src/ktxt2/KTxt2Editor.kiss | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/projects/kiss-vscode/src/ktxt2/KTxt2Editor.kiss b/projects/kiss-vscode/src/ktxt2/KTxt2Editor.kiss index 5d03c83d..233027d9 100644 --- a/projects/kiss-vscode/src/ktxt2/KTxt2Editor.kiss +++ b/projects/kiss-vscode/src/ktxt2/KTxt2Editor.kiss @@ -55,7 +55,8 @@ ((objectWith [type "find"] text) (_find text)) (otherwise (throw "bad message $event for KTxt2Editor")))) - + + (window.addEventListener "wheel" ->e (e.stopPropagation) true) (window.addEventListener "scroll" ->(changeState s (set s.scrollY window.scrollY)))