Narrow diffs to the modified files.

git-svn-id: https://svn.cambridge.iain.cx/profile/trunk@145 6be0d1a5-5cfe-0310-89b6-964be062b18b

diff --git a/.vim/script/p4 b/.vim/script/p4
index ecaacaf..f7cabe5 100644 (file)
--- a/.vim/script/p4
+++ b/.vim/script/p4
@@ -15,9 +15,12 @@ fun! P4submit()
         " Allow closing an unmodified spec.
         set nomod
 
+        " Get the files in the changelist.
+        let l:files = system("sed -n 's/       #.*//p' " . bufname(""))
+
         " Create a new window, move it below the spec and read in a diff.
         botright new
-        r!env P4DIFF= p4 diff -du
+        exe "r!env P4DIFF= p4 diff -du " .  substitute(l:files, "\n", "", "g")
         setf diff
 
         " Delete the blank line left above the diff.

diff --git a/.vim/script/svn b/.vim/script/svn
index 3dd61a3..194b487 100644 (file)
--- a/.vim/script/svn
+++ b/.vim/script/svn
@@ -5,9 +5,12 @@ fun! SVNcommit()
   " Allow closing an unmodified spec.
   set nomod
 
+  " Get the modified files.
+  let l:files = system("sed '1,/^$/d;s/^[MR]....//' " . bufname(""))
+
   " Create a new window, move it below the spec and read in a diff.
   botright new
-  r!svn diff
+  exe "r!svn diff " . substitute(l:files, "\n", " ", "g")
   setf diff
 
   " Delete the blank line left above the diff.