basis/editors/visual-studio-code-exploration/visual-studio-code-exploration.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-exploration
   7
   8 TUPLE: visual-studio-code-exploration < visual-studio-code ;
   9
  10 editor-class [ T{ visual-studio-code-exploration } ] initialize
  11
  12 M: visual-studio-code-exploration find-visual-studio-code-path
  13     os {
  14         { linux [ "code-exploration" which ] }
  15         { macosx [
  16             "com.microsoft.VSCodeExploration" find-native-bundle
  17             [ "Contents/MacOS/Electron" append-path ] [ f ] if* ] }
  18         { windows [
  19             { "Microsoft VS Code Exploration" } "code-exploration.cmd" find-in-applications ] }
  20     } case ;