.vim/script/svn

   1 " Define the function we'll use.  It's easier to do this than to faff about
   2 " trying to run a sequence of normal mode commands.
   3 fun! SVNcommit()
   4   " Allow closing an unmodified spec.
   5   set nomodified
   6
   7   " Get the modified files.  Discount new files.
   8   let l:files = system("sed -n '1,/^$/d;/^[MR]..../{s//\"/;s/$/\"/p;}' " . bufname(""))
   9
  10   if l:files == ""
  11     return
  12   endif
  13
  14   " Create a new window, move it below the spec and read in a diff.
  15   botright new
  16   exe "r!svn diff " . substitute(l:files, "\n", " ", "g")
  17   setf diff
  18
  19   " Delete the blank line left above the diff.
  20   1
  21   delete
  22   set ro
  23   set nomodifiable
  24   set nomodified
  25   set nobuflisted
  26   set buftype=help
  27   setlocal noswapfile
  28   file [svn diff\]
  29   " Map q to quit easily.
  30   nnoremap <silent> <buffer> q <C-W>q
  31
  32   " Switch back to the top window.
  33   wincmd k
  34 endfun
  35
  36 " Expand the command line window so we don't have to press RETURN later.
  37 let s:cmdheight = &cmdheight
  38 se cmdheight=3
  39
  40 " Call and then discard our function.
  41 call SVNcommit()
  42 delfunction SVNcommit
  43
  44 " Restore the command window.
  45 exe "se cmdheight=" . s:cmdheight
  46
  47 " Close the scratch buffer.
  48 if version >= 700
  49   " Vim 7 lets us close the buffer by number.  The changelist is always in #1.
  50   au BufWinLeave <buffer=1> qa!
  51 else
  52   " Prior versions can only do it by name.  Fall back to a temporary file.
  53   au BufWinLeave /tmp/tmp.*.* qa!
  54 endif