kiss-lang/kiss-vscode
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

add jsdom to KissConfig

Browse Source
This commit is contained in:
Nat Quayle Nelson
2022-03-23 14:17:45 -06:00
parent 35782287d5
commit ae45fb3e74
5 changed files with 22 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
projects/kiss-vscode/config/KissConfig.hx
View File

@@ -15,6 +15,7 @@ import sys.FileSystem;
import ktxt2.KTxt2; import ktxt2.KTxt2;
import re_flex.R; import re_flex.R;
import kiss_tools.KeyShortcutHandler; import kiss_tools.KeyShortcutHandler;
import JSDomExterns;
using haxe.io.Path; using haxe.io.Path;
using StringTools; using StringTools;

6
projects/kiss-vscode/config/KissConfig.kiss
View File

@@ -250,3 +250,9 @@
(var :Array<KTxt2Conversion> conversions []) (var :Array<KTxt2Conversion> conversions [])
(function registerConversion [:KTxt2Conversion conversion] (conversions.push conversion))) (function registerConversion [:KTxt2Conversion conversion] (conversions.push conversion)))
(function quickWebview []
(let [dom (new JSDOM "<!DOCTYPE html><p>Hello world</p>")
document dom.window.document]
document))

11
projects/kiss-vscode/src/JSDomExterns.hx Normal file
View File

@@ -0,0 +1,11 @@
import js.html.Document;
typedef JSDOMWindow = {
document:Document
};
@:jsRequire("jsdom")
extern class JSDOM {
function new(html:String);
var window:JSDOMWindow;
}

2
projects/kiss-vscode/src/Main.kiss
View File

@@ -100,6 +100,8 @@
// install all of the user's Node dependencies: // install all of the user's Node dependencies:
(when (FileSystem.exists (joinPath activeConfigDir "package.json")) (when (FileSystem.exists (joinPath activeConfigDir "package.json"))
(npmSafeTrySpawnSync ["npm" "install"] handleConfigFailure)) (npmSafeTrySpawnSync ["npm" "install"] handleConfigFailure))
// install built-in node dependencies:
(npmSafeTrySpawnSync ["npm" "install" "jsdom"] handleConfigFailure)
// Run the haxe compiler: // Run the haxe compiler:
(trySpawnSync "haxe" ["build.hxml"] (object cwd activeConfigDir) handleConfigFailure) (trySpawnSync "haxe" ["build.hxml"] (object cwd activeConfigDir) handleConfigFailure)

1
projects/kiss-vscode/src/Util.kiss
View File

@@ -114,6 +114,7 @@
(openFile dirOrFile))))))) (openFile dirOrFile)))))))
// This has to be a macro so it can return from tryLoadConfig // This has to be a macro so it can return from tryLoadConfig
// TODO this macro should use gensyms
(defMacro trySpawnSync [command args options onError] (defMacro trySpawnSync [command args options onError]
`(let [command ,command `(let [command ,command
args ,args args ,args