1a7241f5fSBram Moolenaar" Vim filetype plugin
25c73622aSBram Moolenaar" Language:	git commit file
35c73622aSBram Moolenaar" Maintainer:	Tim Pope <[email protected]>
4*53bfca22SBram Moolenaar" Last Change:	2012 April 7
5a7241f5fSBram Moolenaar
6a7241f5fSBram Moolenaar" Only do this when not done yet for this buffer
7a7241f5fSBram Moolenaarif (exists("b:did_ftplugin"))
8a7241f5fSBram Moolenaar  finish
9a7241f5fSBram Moolenaarendif
10a7241f5fSBram Moolenaar
11a7241f5fSBram Moolenaarruntime! ftplugin/git.vim
12a7241f5fSBram Moolenaarlet b:did_ftplugin = 1
13a7241f5fSBram Moolenaar
14*53bfca22SBram Moolenaarsetlocal nomodeline
15*53bfca22SBram Moolenaar
16*53bfca22SBram Moolenaarlet b:undo_ftplugin = 'setl modeline<'
17*53bfca22SBram Moolenaar
18a7241f5fSBram Moolenaarif &textwidth == 0
19a7241f5fSBram Moolenaar  " make sure that log messages play nice with git-log on standard terminals
20a7241f5fSBram Moolenaar  setlocal textwidth=72
21*53bfca22SBram Moolenaar  let b:undo_ftplugin .= "|setl tw<"
22a7241f5fSBram Moolenaarendif
23a7241f5fSBram Moolenaar
24a7241f5fSBram Moolenaarif exists("g:no_gitcommit_commands") || v:version < 700
25a7241f5fSBram Moolenaar  finish
26a7241f5fSBram Moolenaarendif
27a7241f5fSBram Moolenaar
28a7241f5fSBram Moolenaarif !exists("b:git_dir")
29a7241f5fSBram Moolenaar  let b:git_dir = expand("%:p:h")
30a7241f5fSBram Moolenaarendif
31a7241f5fSBram Moolenaar
32a7241f5fSBram Moolenaarcommand! -bang -bar -buffer -complete=custom,s:diffcomplete -nargs=* DiffGitCached :call s:gitdiffcached(<bang>0,b:git_dir,<f-args>)
33a7241f5fSBram Moolenaar
34a7241f5fSBram Moolenaarfunction! s:diffcomplete(A,L,P)
35a7241f5fSBram Moolenaar  let args = ""
36a7241f5fSBram Moolenaar  if a:P <= match(a:L." -- "," -- ")+3
37a7241f5fSBram Moolenaar    let args = args . "-p\n--stat\n--shortstat\n--summary\n--patch-with-stat\n--no-renames\n-B\n-M\n-C\n"
38a7241f5fSBram Moolenaar  end
39a7241f5fSBram Moolenaar  if exists("b:git_dir") && a:A !~ '^-'
40a7241f5fSBram Moolenaar    let tree = fnamemodify(b:git_dir,':h')
41a7241f5fSBram Moolenaar    if strpart(getcwd(),0,strlen(tree)) == tree
42a7241f5fSBram Moolenaar      let args = args."\n".system("git diff --cached --name-only")
43a7241f5fSBram Moolenaar    endif
44a7241f5fSBram Moolenaar  endif
45a7241f5fSBram Moolenaar  return args
46a7241f5fSBram Moolenaarendfunction
47a7241f5fSBram Moolenaar
48a7241f5fSBram Moolenaarfunction! s:gitdiffcached(bang,gitdir,...)
49a7241f5fSBram Moolenaar  let tree = fnamemodify(a:gitdir,':h')
50a7241f5fSBram Moolenaar  let name = tempname()
51a7241f5fSBram Moolenaar  let git = "git"
52a7241f5fSBram Moolenaar  if strpart(getcwd(),0,strlen(tree)) != tree
53a7241f5fSBram Moolenaar    let git .= " --git-dir=".(exists("*shellescape") ? shellescape(a:gitdir) : '"'.a:gitdir.'"')
54a7241f5fSBram Moolenaar  endif
55a7241f5fSBram Moolenaar  if a:0
56a7241f5fSBram Moolenaar    let extra = join(map(copy(a:000),exists("*shellescape") ? 'shellescape(v:val)' : "'\"'.v:val.'\"'"))
57a7241f5fSBram Moolenaar  else
58a7241f5fSBram Moolenaar    let extra = "-p --stat=".&columns
59a7241f5fSBram Moolenaar  endif
60*53bfca22SBram Moolenaar  call system(git." diff --cached --no-color --no-ext-diff ".extra." > ".(exists("*shellescape") ? shellescape(name) : name))
61a7241f5fSBram Moolenaar  exe "pedit ".(exists("*fnameescape") ? fnameescape(name) : name)
62a7241f5fSBram Moolenaar  wincmd P
63a7241f5fSBram Moolenaar  let b:git_dir = a:gitdir
64a7241f5fSBram Moolenaar  command! -bang -bar -buffer -complete=custom,s:diffcomplete -nargs=* DiffGitCached :call s:gitdiffcached(<bang>0,b:git_dir,<f-args>)
65*53bfca22SBram Moolenaar  nnoremap <buffer> <silent> q :q<CR>
66a7241f5fSBram Moolenaar  setlocal buftype=nowrite nobuflisted noswapfile nomodifiable filetype=git
67a7241f5fSBram Moolenaarendfunction
68