15 lines
433 B
Factor
15 lines
433 B
Factor
IN: vim
|
|
USING: definitions io kernel parser prettyprint process
|
|
sequences ;
|
|
|
|
: file-modified stat fourth ;
|
|
|
|
: vim-line/file ( file line -- )
|
|
>r "vim " swap append r> unparse " +" swap append3 system drop ;
|
|
|
|
: vim ( spec -- )
|
|
#! Edit the file in vim. Rerun the file if the timestamp is changed.
|
|
dup where first2 >r ?resource-path [ file-modified ] keep r>
|
|
dupd vim-line/file file-modified = [ drop ] [ reload ] if ;
|
|
|