Cleaning some things up
This commit is contained in:
126
.vim/bundle/vim-vinegar/plugin/vinegar.vim
Normal file
126
.vim/bundle/vim-vinegar/plugin/vinegar.vim
Normal file
@@ -0,0 +1,126 @@
|
||||
" vinegar.vim - combine with netrw to create a delicious salad dressing
|
||||
" Maintainer: Tim Pope <http://tpo.pe/>
|
||||
|
||||
if exists("g:loaded_vinegar") || v:version < 700 || &cp
|
||||
finish
|
||||
endif
|
||||
let g:loaded_vinegar = 1
|
||||
|
||||
function! s:fnameescape(file) abort
|
||||
if exists('*fnameescape')
|
||||
return fnameescape(a:file)
|
||||
else
|
||||
return escape(a:file," \t\n*?[{`$\\%#'\"|!<")
|
||||
endif
|
||||
endfunction
|
||||
|
||||
let s:dotfiles = '\(^\|\s\s\)\zs\.\S\+'
|
||||
|
||||
let g:netrw_sort_sequence = '[\/]$,*,\%(' . join(map(split(&suffixes, ','), 'escape(v:val, ".*$~")'), '\|') . '\)[*@]\=$'
|
||||
let s:escape = 'substitute(escape(v:val, ".$~"), "*", ".*", "g")'
|
||||
let g:netrw_list_hide =
|
||||
\ join(map(split(&wildignore, ','), '"^".' . s:escape . '. "/\\=$"'), ',') . ',^\.\.\=/\=$' .
|
||||
\ (get(g:, 'netrw_list_hide', '')[-strlen(s:dotfiles)-1:-1] ==# s:dotfiles ? ','.s:dotfiles : '')
|
||||
if !exists("g:netrw_banner")
|
||||
let g:netrw_banner = 0
|
||||
endif
|
||||
let s:netrw_up = ''
|
||||
|
||||
nnoremap <silent> <Plug>VinegarUp :call <SID>opendir('edit')<CR>
|
||||
if empty(maparg('-', 'n'))
|
||||
nmap - <Plug>VinegarUp
|
||||
endif
|
||||
|
||||
nnoremap <silent> <Plug>VinegarTabUp :call <SID>opendir('tabedit')<CR>
|
||||
nnoremap <silent> <Plug>VinegarSplitUp :call <SID>opendir('split')<CR>
|
||||
nnoremap <silent> <Plug>VinegarVerticalSplitUp :call <SID>opendir('vsplit')<CR>
|
||||
|
||||
function! s:opendir(cmd) abort
|
||||
let df = ','.s:dotfiles
|
||||
if expand('%:t')[0] ==# '.' && g:netrw_list_hide[-strlen(df):-1] ==# df
|
||||
let g:netrw_list_hide = g:netrw_list_hide[0 : -strlen(df)-1]
|
||||
endif
|
||||
if &filetype ==# 'netrw'
|
||||
let currdir = fnamemodify(b:netrw_curdir, ':t')
|
||||
execute s:netrw_up
|
||||
call s:seek(currdir)
|
||||
elseif expand('%') =~# '^$\|^term:[\/][\/]'
|
||||
execute a:cmd '.'
|
||||
else
|
||||
execute a:cmd '%:h'
|
||||
call s:seek(expand('#:t'))
|
||||
endif
|
||||
endfunction
|
||||
|
||||
function! s:seek(file) abort
|
||||
if get(b:, 'netrw_liststyle') == 2
|
||||
let pattern = '\%(^\|\s\+\)\zs'.escape(a:file, '.*[]~\').'[/*|@=]\=\%($\|\s\+\)'
|
||||
else
|
||||
let pattern = '^\%(| \)*'.escape(a:file, '.*[]~\').'[/*|@=]\=\%($\|\t\)'
|
||||
endif
|
||||
call search(pattern, 'wc')
|
||||
return pattern
|
||||
endfunction
|
||||
|
||||
augroup vinegar
|
||||
autocmd!
|
||||
autocmd FileType netrw call s:setup_vinegar()
|
||||
augroup END
|
||||
|
||||
function! s:slash() abort
|
||||
return !exists("+shellslash") || &shellslash ? '/' : '\'
|
||||
endfunction
|
||||
|
||||
function! s:absolutes(first, ...) abort
|
||||
let files = getline(a:first, a:0 ? a:1 : a:first)
|
||||
call filter(files, 'v:val !~# "^\" "')
|
||||
call map(files, 'b:netrw_curdir . s:slash() . substitute(v:val, "[/*|@=]\\=\\%(\\t.*\\)\\=$", "", "")')
|
||||
return files
|
||||
endfunction
|
||||
|
||||
function! s:relatives(first, ...) abort
|
||||
let files = s:absolutes(a:first, a:0 ? a:1 : a:first)
|
||||
call filter(files, 'v:val !~# "^\" "')
|
||||
for i in range(len(files))
|
||||
let relative = fnamemodify(files[i], ':.')
|
||||
if relative !=# files[i]
|
||||
let files[i] = '.' . s:slash() . relative
|
||||
endif
|
||||
endfor
|
||||
return files
|
||||
endfunction
|
||||
|
||||
function! s:escaped(first, last) abort
|
||||
let files = s:relatives(a:first, a:last)
|
||||
return join(map(files, 'fnameescape(v:val)'), ' ')
|
||||
endfunction
|
||||
|
||||
function! s:setup_vinegar() abort
|
||||
if empty(s:netrw_up)
|
||||
" save netrw mapping
|
||||
if strpart(g:loaded_netrw, 1, strlen(g:loaded_netrw)) < 162
|
||||
let s:netrw_up = substitute(maparg('-', 'n'), '\c^:\%(<c-u>\)\=', '', '')
|
||||
else
|
||||
let s:netrw_up = substitute(maparg('<Plug>NetrwBrowseUpDir', 'n'), '\c^:\%(<c-u>\)\=', '', '')
|
||||
endif
|
||||
" saved string is like this:
|
||||
" :exe "norm! 0"|call netrw#LocalBrowseCheck(<SNR>172_NetrwBrowseChgDir(1,'../'))<CR>
|
||||
" remove <CR> at the end (otherwise raises "E488: Trailing characters")
|
||||
let s:netrw_up = strpart(s:netrw_up, 0, strlen(s:netrw_up)-4)
|
||||
endif
|
||||
nmap <buffer> - <Plug>VinegarUp
|
||||
cnoremap <buffer><expr> <Plug><cfile> get(<SID>relatives('.'),0,"\022\006")
|
||||
if empty(maparg('<C-R><C-F>', 'c'))
|
||||
cmap <buffer> <C-R><C-F> <Plug><cfile>
|
||||
endif
|
||||
nnoremap <buffer> ~ :edit ~/<CR>
|
||||
nnoremap <buffer> . :<C-U> <C-R>=<SID>escaped(line('.'), line('.') - 1 + v:count1)<CR><Home>
|
||||
xnoremap <buffer> . <Esc>: <C-R>=<SID>escaped(line("'<"), line("'>"))<CR><Home>
|
||||
if empty(mapcheck('y.', 'n'))
|
||||
nnoremap <silent><buffer> y. :<C-U>call setreg(v:register, join(<SID>absolutes(line('.'), line('.') - 1 + v:count1), "\n")."\n")<CR>
|
||||
endif
|
||||
nmap <buffer> ! .!
|
||||
xmap <buffer> ! .!
|
||||
exe 'syn match netrwSuffixes =\%(\S\+ \)*\S\+\%('.join(map(split(&suffixes, ','), s:escape), '\|') . '\)[*@]\=\S\@!='
|
||||
hi def link netrwSuffixes SpecialKey
|
||||
endfunction
|
Reference in New Issue
Block a user