basis/editors/brackets/brackets.factor

   1 ! Copyright (C) 2015 Dimage Sapelkin.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: editors io.pathnames io.standard-paths kernel make
   4 namespaces system vocabs ;
   5 IN: editors.brackets
   6
   7 SINGLETON: brackets-editor
   8 brackets-editor editor-class set-global
   9
  10 HOOK: brackets-path os ( -- path )
  11
  12 M: macosx brackets-path
  13     "io.brackets.appshell" find-native-bundle [
  14         "Contents/MacOS/Brackets" append-path
  15     ] [
  16         f
  17     ] if* ;
  18
  19 M: brackets-editor editor-command
  20     [ brackets-path "brackets" or , drop , ] { } make ;
  21
  22 os windows? [ "editors.brackets.windows" require ] when