From e926f30a1cda75f6334b79c303b5134f0441a3dc Mon Sep 17 00:00:00 2001 From: Werner Koch Date: Thu, 19 Jan 2017 15:01:44 +0100 Subject: [PATCH] build: Print a commit id in the generated ChangeLog * build-aux/gitlog-to-changelog: Print an extra line with the commit id. Signed-off-by: Werner Koch --- build-aux/gitlog-to-changelog | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/build-aux/gitlog-to-changelog b/build-aux/gitlog-to-changelog index 24a3d72ce..f70f49917 100755 --- a/build-aux/gitlog-to-changelog +++ b/build-aux/gitlog-to-changelog @@ -179,6 +179,7 @@ sub parse_amend_file($) my $amend_file; my $append_dot = 0; my $tear_off = 0; + my $firstline; GetOptions ( help => sub { usage 0 }, @@ -338,7 +339,9 @@ sub parse_amend_file($) # Prefix each non-empty line with a TAB. @line = map { length $_ ? "\t$_" : '' } @line; - print "\n", join ("\n", @line), "\n"; + $firstline = shift @line; + print "\n", $firstline, "\n", "\t+ commit $sha\n"; + print join ("\n", @line), "\n"; } SKIPCOMMIT: