basis/editors/gvim/gvim.factor

   1 USING: editors.vim io.backend io.standard-paths kernel
   2 namespaces system vocabs editors ;
   3 IN: editors.gvim
   4
   5 ! This code builds on the code in editors.vim; see there for
   6 ! more information.
   7
   8 TUPLE: gvim < vim ;
   9 T{ gvim } editor-class set-global
  10
  11 HOOK: find-gvim-path io-backend ( -- path )
  12
  13 M: object find-gvim-path f ;
  14
  15 M: windows find-gvim-path
  16     { "vim" } "gvim.exe" find-in-applications ;
  17
  18 M: gvim find-vim-path
  19     find-gvim-path [ "gvim" ?find-in-path ] unless* ;
  20
  21 M: gvim vim-ui? t ;
  22
  23 M: gvim editor-detached? t ;