diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2013-08-25 15:59:56 +0100 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2013-08-25 15:59:56 +0100 |
commit | dac79ba60f22d978a2b3f834358c7f865bcf131a (patch) | |
tree | aa715e52b41cfa314bf411ddcc0cedbadbbf61bb /dgit | |
parent | afd3aa8b36b05f6cf01b17d553fc14250afacaec (diff) |
Autogenerated quilt patch fixup patch Description contains several recent git commits, rather than implying that the patch corresponds exactly to the top git commit.
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 13 |
1 files changed, 9 insertions, 4 deletions
@@ -992,18 +992,23 @@ sub build_maybe_quilt_fixup () { chomp; return unless madformat($_); # sigh + my $clogp = parsechangelog(); + my $version = getfield $clogp, 'Version'; + my $author = getfield $clogp, 'Maintainer'; my $headref = rev_parse('HEAD'); my $time = time; + my $ncommits = 3; my $patchname = "auto-$version-$headref-$time"; - my $author = cmdoutput @git, qw(log -n1), '--pretty=format:%an <%ae>'; - my $msg = cmdoutput @git, qw(log -n1), "--pretty=format:%s\n%b"; + my $msg = cmdoutput @git, qw(log), "-n$ncommits"; my $descfn = ".git/dgit/quilt-description.tmp"; open O, '>', $descfn or die "$descfn: $!"; $msg =~ s/\n/\n /g; $msg =~ s/^\s+$/ ./mg; print O <<END or die $!; -Description: $msg - [generated from git commit $headref] +Description: Automatically generated patch ($clogp->{Version}) + Last (up to) $ncommits git changes, FYI: + . + $msg Author: $author --- |