steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Add Mac support for Visual Studio Code

db4
Benjamin Pollack 2016-02-12 10:06:50 -05:00
parent fffb501486
commit 97d1ec759e
2 changed files with 12 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
basis/editors/visual-studio-code/visual-studio-code.factor
View File

@ -6,17 +6,20 @@ IN: editors.visual-studio-code
SINGLETON: visual-studio-code SINGLETON: visual-studio-code
visual-studio-code editor-class set-global visual-studio-code editor-class set-global
HOOK: find-visual-studio-code-path os ( -- path ) HOOK: find-visual-studio-code-invocation os ( -- array )
MEMO: visual-studio-code-path ( -- path ) MEMO: visual-studio-code-invocation ( -- array )
\ visual-studio-code-path get [ \ visual-studio-code-invocation get [
find-visual-studio-code-path find-visual-studio-code-invocation
[ "code" ] unless* [ { "code" } ] unless*
] unless* ; ] unless* ;
M: macosx find-visual-studio-code-invocation
{ "open" "-n" "-b" "com.microsoft.VSCode" "--args" } ;
M: visual-studio-code editor-command ( file line -- command ) M: visual-studio-code editor-command ( file line -- command )
[ [
visual-studio-code-path , drop , visual-studio-code-invocation % drop ,
] { } make ; ] { } make ;
os windows? [ "editors.visual-studio-code.windows" require ] when os windows? [ "editors.visual-studio-code.windows" require ] when

5
basis/editors/visual-studio-code/windows/windows.factor
View File

@ -5,6 +5,7 @@ io.directories.search io.files.temp.windows io.pathnames kernel
system ; system ;
IN: editors.visual-studio-code.windows IN: editors.visual-studio-code.windows
M: windows find-visual-studio-code-path M: windows find-visual-studio-code-invocation
get-appdata-directory f get-appdata-directory f
[ file-name >lower "code.exe" = ] find-in-directories ; [ file-name >lower "code.exe" = ] find-in-directories
[ 1array ] [ f ] if* ;