Merge pull request #27 from inkarkat/fix-selection-exclusive
Support :set selection=exclusive
This commit is contained in:
commit
9c025e5914
@ -32,13 +32,17 @@ endfunction
|
||||
function! s:exchange_get(type, vis)
|
||||
let reg = getreg('"')
|
||||
let reg_mode = getregtype('"')
|
||||
let selection = &selection
|
||||
let &selection = 'inclusive'
|
||||
if a:vis
|
||||
let type = a:type
|
||||
let [start, end] = s:store_pos("'<", "'>")
|
||||
silent exe "normal! `<" . a:type . "`>y"
|
||||
elseif a:type == 'line'
|
||||
silent normal! gvy
|
||||
if &selection ==# 'exclusive' && start != end
|
||||
let end[2] -= len(matchstr(@@, '\_.$'))
|
||||
endif
|
||||
else
|
||||
let selection = &selection
|
||||
let &selection = 'inclusive'
|
||||
if a:type == 'line'
|
||||
let type = 'V'
|
||||
let [start, end] = s:store_pos("'[", "']")
|
||||
silent exe "normal! '[V']y"
|
||||
@ -51,9 +55,10 @@ function! s:exchange_get(type, vis)
|
||||
let [start, end] = s:store_pos("'[", "']")
|
||||
silent exe "normal! `[v`]y"
|
||||
endif
|
||||
let &selection = selection
|
||||
endif
|
||||
let text = getreg('@')
|
||||
call setreg('"', reg, reg_mode)
|
||||
let &selection = selection
|
||||
return [text, type, start, end]
|
||||
endfunction
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user