romenskiy2012/curl
1
0
Fork 0
mirror of https://github.com/curl/curl.git synced 2026-04-28 13:42:16 +03:00
Code Issues Projects Releases Packages Wiki Activity

Make the output of log2changes.pl even more closely match CHANGES

Browse source 
Add the ASCII art header, and list version commits by decoding
the ref tag names, when available (using the git log --decorate
option).
This commit is contained in:
Dan Fandrich 2010-06-21 12:24:27 -07:00
parent bd5d478dd4
commit 8e7ec794f5
1 changed files with 24 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

26
log2changes.pl
View file

@ -1,6 +1,6 @@
#!/usr/bin/perl
# git log --pretty=fuller --no-color --date=short
# git log --pretty=fuller --no-color --date=short --decorate
my @mname = ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun',
'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec' );
@ -14,12 +14,30 @@ sub nicedate {
return $date;
}
print
' _ _ ____ _
___| | | | _ \| |
/ __| | | | |_) | |
| (__| |_| | _ <| |___
\___|\___/|_| \_\_____|
Changelog
';
my $line;
my $tag;
while(<STDIN>) {
my $l = $_;
if($l =~/^commit (.*)/) {
if($l =~/^commit ([[:xdigit:]]*) ?(.*)/) {
$co = $1;
my $ref = $2;
if ($ref =~ /refs\/tags\/curl-(.*)\)/) {
$tag = $1;
$tag =~ tr/_/./;
} else {
$tag = '';
}
}
elsif($l =~ /^Author: *(.*) +</) {
$a = $1;
@ -38,6 +56,10 @@ while(<STDIN>) {
else {
$extra="\n- ";
}
if ($tag) {
# Version entries have a special format
$c = "Version " . $tag;
}
if($co ne $oldco) {
if($c ne $oldc) {
print "\n$c ($date)$extra";