mklog: Run mklog as a filter.

contrib/
2014-07-21  Trevor Saunders  <tsaunders@mozilla.com>
	    Yury Gribov  <y.gribov@samsung.com>

	* mklog: Run mklog as a filter.

Co-Authored-By: Yury Gribov <y.gribov@samsung.com>

From-SVN: r212884
This commit is contained in:
Trevor Saunders 2014-07-21 07:45:45 +00:00 committed by Yury Gribov
parent 863aa163a0
commit 633e5fbb24
2 changed files with 14 additions and 12 deletions

View File

@ -1,6 +1,11 @@
2014-07-21 Trevor Saunders <tsaunders@mozilla.com>
Yury Gribov <y.gribov@samsung.com>
* mklog: Run mklog as a filter.
2014-07-21 Trevor Saunders <tsaunders@mozilla.com>
mklog: Read name and email from git config when available.
* mklog: Read name and email from git config when available.
2014-06-28 Richard Biener <rguenther@suse.de>

View File

@ -59,9 +59,13 @@ if (-d .git) {
#-----------------------------------------------------------------------------
if ($#ARGV != 0) {
$prog = `basename $0`; chop ($prog);
print "usage: $prog file.diff\n\n";
print "Adds a ChangeLog template to the start of file.diff\n";
print "It assumes that file.diff has been created with -up or -cp.\n";
print <<EOF;
usage: $prog file.diff
Generate ChangeLog template for file.diff.
It assumes that patch has been created with -up or -cp.
When file.diff is -, read standard input.
EOF
exit 1;
}
@ -270,15 +274,8 @@ foreach (@diff_lines) {
# functions.
$cl_entries{$clname} .= $change_msg ? "$change_msg\n" : ":\n";
$temp = `mktemp /tmp/$basename.XXXXXX` || exit 1; chop ($temp);
open (CLFILE, ">$temp") or die "Could not open file $temp for writing";
foreach my $clname (keys %cl_entries) {
print CLFILE "$clname:\n\n$hdrline\n\n$cl_entries{$clname}\n";
print "$clname:\n\n$hdrline\n\n$cl_entries{$clname}\n";
}
# Concatenate the ChangeLog template and the original .diff file.
system ("cat $diff >>$temp && mv $temp $diff") == 0
or die "Could not add the ChangeLog entry to $diff";
exit 0;