Mercurial > ec-dotfiles
comparison vendor/vim-packs/ctrlp.vim/autoload/ctrlp/changes.vim @ 707:4576f1471f53
[update-vendor, vim] add ctrlp
| author | nanaya <me@nanaya.net> |
|---|---|
| date | Sun, 18 Dec 2022 22:27:56 +0900 |
| parents | |
| children |
comparison
equal
deleted
inserted
replaced
| 706:4b30df382167 | 707:4576f1471f53 |
|---|---|
| 1 " ============================================================================= | |
| 2 " File: autoload/ctrlp/changes.vim | |
| 3 " Description: Change list extension | |
| 4 " Author: Kien Nguyen <github.com/kien> | |
| 5 " ============================================================================= | |
| 6 | |
| 7 " Init {{{1 | |
| 8 if exists('g:loaded_ctrlp_changes') && g:loaded_ctrlp_changes | |
| 9 fini | |
| 10 en | |
| 11 let g:loaded_ctrlp_changes = 1 | |
| 12 | |
| 13 cal add(g:ctrlp_ext_vars, { | |
| 14 \ 'init': 'ctrlp#changes#init(s:bufnr, s:crbufnr)', | |
| 15 \ 'accept': 'ctrlp#changes#accept', | |
| 16 \ 'lname': 'changes', | |
| 17 \ 'sname': 'chs', | |
| 18 \ 'exit': 'ctrlp#changes#exit()', | |
| 19 \ 'type': 'tabe', | |
| 20 \ 'sort': 0, | |
| 21 \ 'nolim': 1, | |
| 22 \ }) | |
| 23 | |
| 24 let s:id = g:ctrlp_builtins + len(g:ctrlp_ext_vars) | |
| 25 " Utilities {{{1 | |
| 26 fu! s:changelist(bufnr) | |
| 27 sil! exe 'noa hid b' a:bufnr | |
| 28 redi => result | |
| 29 sil! changes | |
| 30 redi END | |
| 31 retu map(split(result, "\n")[1:], 'tr(v:val, " ", " ")') | |
| 32 endf | |
| 33 | |
| 34 fu! s:process(clines, ...) | |
| 35 let [clines, evas] = [[], []] | |
| 36 for each in a:clines | |
| 37 let parts = matchlist(each, '\v^.\s*\d+\s+(\d+)\s+(\d+)\s(.*)$') | |
| 38 if !empty(parts) | |
| 39 if parts[3] == '' | let parts[3] = ' ' | en | |
| 40 cal add(clines, parts[3].' |'.a:1.':'.a:2.'|'.parts[1].':'.parts[2].'|') | |
| 41 en | |
| 42 endfo | |
| 43 retu reverse(filter(clines, 'count(clines, v:val) == 1')) | |
| 44 endf | |
| 45 | |
| 46 fu! s:syntax() | |
| 47 if !ctrlp#nosy() | |
| 48 cal ctrlp#hicheck('CtrlPBufName', 'Directory') | |
| 49 cal ctrlp#hicheck('CtrlPTabExtra', 'Comment') | |
| 50 sy match CtrlPBufName '\t|\d\+:\zs[^|]\+\ze|\d\+:\d\+|$' | |
| 51 sy match CtrlPTabExtra '\zs\t.*\ze$' contains=CtrlPBufName | |
| 52 en | |
| 53 endf | |
| 54 " Public {{{1 | |
| 55 fu! ctrlp#changes#init(original_bufnr, bufnr) | |
| 56 let bufnr = exists('s:bufnr') ? s:bufnr : a:bufnr | |
| 57 let bufs = exists('s:clmode') && s:clmode ? ctrlp#buffers('id') : [bufnr] | |
| 58 cal filter(bufs, 'v:val > 0') | |
| 59 let [swb, &swb] = [&swb, ''] | |
| 60 let lines = [] | |
| 61 for each in bufs | |
| 62 let bname = bufname(each) | |
| 63 let fnamet = fnamemodify(bname == '' ? '[No Name]' : bname, ':t') | |
| 64 cal extend(lines, s:process(s:changelist(each), each, fnamet)) | |
| 65 endfo | |
| 66 sil! exe 'noa hid b' a:original_bufnr | |
| 67 let &swb = swb | |
| 68 cal ctrlp#syntax() | |
| 69 cal s:syntax() | |
| 70 retu lines | |
| 71 endf | |
| 72 | |
| 73 fu! ctrlp#changes#accept(mode, str) | |
| 74 let info = matchlist(a:str, '\t|\(\d\+\):[^|]\+|\(\d\+\):\(\d\+\)|$') | |
| 75 let bufnr = str2nr(get(info, 1)) | |
| 76 if bufnr | |
| 77 cal ctrlp#acceptfile(a:mode, bufnr) | |
| 78 cal cursor(get(info, 2), get(info, 3)) | |
| 79 sil! norm! zvzz | |
| 80 en | |
| 81 endf | |
| 82 | |
| 83 fu! ctrlp#changes#cmd(mode, ...) | |
| 84 let s:clmode = a:mode | |
| 85 if a:0 && !empty(a:1) | |
| 86 let s:clmode = 0 | |
| 87 let bname = a:1 =~# '^%$\|^#\d*$' ? expand(a:1) : a:1 | |
| 88 let s:bufnr = bufnr('^'.fnamemodify(bname, ':p').'$') | |
| 89 en | |
| 90 retu s:id | |
| 91 endf | |
| 92 | |
| 93 fu! ctrlp#changes#exit() | |
| 94 unl! s:clmode s:bufnr | |
| 95 endf | |
| 96 "}}} | |
| 97 | |
| 98 " vim:fen:fdm=marker:fmr={{{,}}}:fdl=0:fdc=1:ts=2:sw=2:sts=2 |
