.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 nomod
   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   se nobuflisted
  23   set buftype=nowrite
  24   set bufhidden=hide
  25   setlocal noswapfile
  26   file [svn diff\]
  27   " Map q to quit easily.
  28   noremap <silent> <buffer> q <C-W>q
  29
  30   " Switch back to the top window.
  31   wincmd k
  32 endfun
  33
  34 " Expand the command line window so we don't have to press RETURN later.
  35 let s:cmdheight = &cmdheight
  36 se cmdheight=3
  37
  38 " Call and then discard our function.
  39 call SVNcommit()
  40 delfunction SVNcommit
  41
  42 " Restore the command window.
  43 exe "se cmdheight=" . s:cmdheight
  44
  45 " Close the scratch buffer.
  46 au BufWinLeave <buffer=1> qa!