navid.sassan/vim-tmux-runner.vim
1
1
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add explicit EnsurePane option to sending commands

Browse Source 
Add bang version of SendLinesToRunner and SendCommand which will ensure
a runner is present and open one if needed. Also add optional second
argument to VtrSendCommand function to ensure runner pane

Closes #27 - Add EnsurePaneAndRun
This commit is contained in:
Chris Toomey 2015-01-04 14:10:49 -05:00
parent a0d0e95cdf
commit d56939fa94
1 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
plugin/vim-tmux-runner.vim
View File

@ -304,7 +304,8 @@ function! s:FlushCommand()
endif endif
endfunction endfunction
function! s:SendCommandToRunner(...) function! s:SendCommandToRunner(ensure_pane, ...)
if a:ensure_pane | call s:EnsureRunnerPane() | endif
if !s:ValidRunnerPaneSet() | return | endif if !s:ValidRunnerPaneSet() | return | endif
if exists("a:1") && a:1 != "" if exists("a:1") && a:1 != ""
let s:user_command = shellescape(a:1) let s:user_command = shellescape(a:1)
@ -338,7 +339,9 @@ function! s:EnsureRunnerPane(...)
endif endif
endfunction endfunction
function! s:SendLinesToRunner() range function! s:SendLinesToRunner(ensure_pane) range
if a:ensure_pane | call s:EnsureRunnerPane() | endif
if !s:ValidRunnerPaneSet() | return | endif
call s:SendTextToRunner(getline(a:firstline, a:lastline)) call s:SendTextToRunner(getline(a:firstline, a:lastline))
endfunction endfunction
@ -370,14 +373,18 @@ function! s:SendCtrlD()
call s:SendKeys('') call s:SendKeys('')
endfunction endfunction
function! VtrSendCommand(command) function! VtrSendCommand(command, ...)
call s:SendCommandToRunner(a:command) let ensure_pane = 0
if exists("a:1")
let ensure_pane = a:1
endif
call s:SendCommandToRunner(ensure_pane, a:command)
endfunction endfunction
function! s:DefineCommands() function! s:DefineCommands()
command! -nargs=? VtrSendCommandToRunner call s:SendCommandToRunner(<f-args>)
command! -nargs=? VtrOpenRunner call s:EnsureRunnerPane(<args>) command! -nargs=? VtrOpenRunner call s:EnsureRunnerPane(<args>)
command! -range VtrSendLinesToRunner <line1>,<line2>call s:SendLinesToRunner() command! -bang -nargs=? VtrSendCommandToRunner call s:SendCommandToRunner(<bang>0, <f-args>)
command! -bang -range VtrSendLinesToRunner <line1>,<line2>call s:SendLinesToRunner(<bang>0)
command! VtrKillRunner call s:KillRunnerPane() command! VtrKillRunner call s:KillRunnerPane()
command! VtrFocusRunner call s:FocusRunnerPane() command! VtrFocusRunner call s:FocusRunnerPane()
command! VtrReorientRunner call s:ReorientRunner() command! VtrReorientRunner call s:ReorientRunner()