19 lines
453 B
Factor
19 lines
453 B
Factor
USING: core-foundation.launch-services editors editors.vim
|
|
io.pathnames io.standard-paths kernel namespaces ;
|
|
IN: editors.macvim
|
|
|
|
TUPLE: macvim < vim ;
|
|
T{ macvim } \ editor-class set-global
|
|
|
|
: find-macvim-bundle-path ( -- path/f )
|
|
"org.vim.MacVim" find-native-bundle [
|
|
"Contents/MacOS/Vim" append-path
|
|
] [
|
|
f
|
|
] if* ;
|
|
|
|
M: macvim find-vim-path find-macvim-bundle-path ;
|
|
|
|
M: macvim vim-ui? t ;
|
|
M: macvim editor-detached? t ;
|