fix kiss-vscode concat type error

This commit is contained in:
2022-05-09 15:24:38 -04:00
parent 3e6649b0be
commit 265f81405b

View File

@@ -123,7 +123,7 @@
(withValueOrInputBox dir
(set dir (dir.replace "\\" "/"))
(when (dir.endsWith "/") (set dir (substr dir 0 -1)))
(awaitLet [dirOrFile ((if allowNew autoSuggestPick quickPick) (concat [".."] (sys.FileSystem.readDirectory dir)))]
(awaitLet [dirOrFile ((if allowNew autoSuggestPick quickPick) (cast (concat [".."] (sys.FileSystem.readDirectory dir))))]
(let [dirOrFile
(case dirOrFile
(".."