basis/editors/visual-studio-code-insiders/visual-studio-code-insiders.factor

   1 ! Copyright (C) 2020 Doug Coleman.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: combinators editors editors.visual-studio-code
   4 io.pathnames io.standard-paths kernel namespaces system
   5 tools.which ;
   6 IN: editors.visual-studio-code-insiders
   7
   8 TUPLE: visual-studio-code-insiders < visual-studio-code ;
   9
  10 editor-class [ T{ visual-studio-code-insiders } ] initialize
  11
  12 M: visual-studio-code-insiders find-visual-studio-code-path
  13     os {
  14         { linux [ "code-insiders" which ] }
  15         { macosx [
  16             "com.microsoft.VSCodeInsiders" find-native-bundle
  17             [ "Contents/MacOS/Electron" append-path ] [ f ] if* ] }
  18         { windows [
  19             { "Microsoft VS Code Insiders" } "code-insiders.cmd" find-in-applications ] }
  20     } case ;