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 |