1 " $Id$ vim: se syntax=vim:
2 " Define the function we'll use. It's easier to do this than to faff about
3 " trying to run a sequence of normal mode commands.
5 " There's no point doing this if the spec is readonly. That probably means
6 " it's a submitted change.
10 " Clear the unnamed register.
13 " Delete the spec blurb if it exists.
14 /^# A Perforce Change Spec/,/^# *(New changelists only\.)$/d
15 " If the blurb was deleted the text will be in the unnamed register.
16 if @" != "grgergregergeg"
17 " Delete the blank line left above the remaining fields.
21 " Allow closing an unmodified spec.
24 " Get the files in the changelist.
25 let l:files = system("sed -n 's@^ \\(//.*\\) #.*@\\1@p' " . bufname(""))
26 " Create a new window, move it below the spec and read in a diff.
29 exe "r!env P4DIFF= p4 diff -du " . substitute(l:files, "\n", " ", "g")
34 " Delete the blank line left above the diff.
43 " Switch back to the top window and put the cursor by the description.
47 ?<enter description here>
51 " We get here if no blurb was deleted. This is the case if we aren't
57 " Expand the command line window so we don't have to press RETURN later.
58 let s:cmdheight = &cmdheight
61 " Call and then discard our function.
64 " Don't expand tabs in the spec.
67 " Restore the command window.
68 exe "set cmdheight=" . s:cmdheight
70 " Close the scratch buffer.
72 " Vim 7 lets us close the buffer by number. The changelist is always in #1.
73 au BufWinLeave <buffer=1> qa!
75 " Prior versions can only do it by name. Fall back to a temporary file.
76 au BufWinLeave /tmp/tmp.*.* qa!