X-Git-Url: http://git.iain.cx/?a=blobdiff_plain;f=.vim%2Fscript%2Fsvn;h=f648862f8f54a8b2e1649ed5c1b64f005b06b4b2;hb=0d1d3e8398fd0d7844edf1e2ad13d1adc245de17;hp=c927fe41828efb3f5725cb304fa2f2bf77ceeb79;hpb=76b5cebac934122bdf500f5d78cc73813e76d96b;p=profile.git

diff --git a/.vim/script/svn b/.vim/script/svn
index c927fe4..f648862 100644
--- a/.vim/script/svn
+++ b/.vim/script/svn
@@ -1,12 +1,11 @@
-" $Id$ vim: se syntax=vim:
 " Define the function we'll use.  It's easier to do this than to faff about 
 " trying to run a sequence of normal mode commands.
 fun! SVNcommit()
   " Allow closing an unmodified spec.
-  set nomod
+  set nomodified
 
   " Get the modified files.  Discount new files.
-  let l:files = system("sed -n '1,/^$/d;s/^[MR]....//p' " . bufname(""))
+  let l:files = system("sed -n '1,/^$/d;/^[MR]..../{s//\"/;s/$/\"/p;}' " . bufname(""))
 
   if l:files == ""
     return
@@ -20,11 +19,15 @@ fun! SVNcommit()
   " Delete the blank line left above the diff.
   1
   delete
-  se nobuflisted
-  set buftype=nowrite
-  set bufhidden=hide
+  set ro
+  set nomodifiable
+  set nomodified
+  set nobuflisted
+  set buftype=help
   setlocal noswapfile
-  file [svn diff]
+  file [svn diff\]
+  " Map q to quit easily.
+  nnoremap <silent> <buffer> q <C-W>q
 
   " Switch back to the top window.
   wincmd k
@@ -42,4 +45,10 @@ delfunction SVNcommit
 exe "se cmdheight=" . s:cmdheight
 
 " Close the scratch buffer.
-au BufWinLeave <buffer=1> qa!
+if version >= 700
+  " Vim 7 lets us close the buffer by number.  The changelist is always in #1.
+  au BufWinLeave <buffer=1> qa!
+else
+  " Prior versions can only do it by name.  Fall back to a temporary file.
+  au BufWinLeave /tmp/tmp.*.* qa!
+endif