Kiss-vscode new class open .hx and .kiss side-by-side. Close #84

2022-08-02 15:38:46 +00:00
parent 988d4d6652
commit ed90a199b3
1 changed files with 4 additions and 1 deletions
--- a/projects/kiss-vscode/src/commands/KissTools.kiss
+++ b/projects/kiss-vscode/src/commands/KissTools.kiss
@@ -34,7 +34,10 @@ import kiss.List;
 class ${className} {}
 ")
                (File.saveContent kissFile "")
-                (showTextDocument (Uri.file kissFile))))))
+                (awaitLet [_ (showTextDocument (Uri.file haxeFile) (object viewColumn ViewColumn.Active))]
+                    (executeCommand "workbench.action.keepEditor")
+                    (awaitLet [_ (showTextDocument (Uri.file kissFile) (object viewColumn ViewColumn.Beside))]
+                        (executeCommand "workbench.action.keepEditor")))))))

 (function correspondingFile [:String kissOrHxFile]
    (let [base