[Libreoffice-commits] dev-tools.git: scripts/aoo-annotate.pl
Michael Meeks
michael.meeks at suse.com
Wed Feb 27 04:57:17 PST 2013
scripts/aoo-annotate.pl | 18 ++++++++----------
1 file changed, 8 insertions(+), 10 deletions(-)
New commits:
commit 0bb3bbeff956c1a24d1c317e3999dc761d7cecb9
Author: Michael Meeks <michael.meeks at suse.com>
Date: Wed Feb 27 12:56:37 2013 +0000
more output & some cleanup.
diff --git a/scripts/aoo-annotate.pl b/scripts/aoo-annotate.pl
index 781bd26..5a32736 100755
--- a/scripts/aoo-annotate.pl
+++ b/scripts/aoo-annotate.pl
@@ -74,10 +74,10 @@ sub dump_breakdown($)
}
print STDERR "$annotated annotations of $rev_count commits\n";
- print STDERR "with an initial block of $contiguous annotation\n";
for my $stem (sort { $frequency{$b} <=> $frequency{$a} } keys %frequency) {
print STDERR "$frequency{$stem}\t$stem\n";
}
+ print STDERR "contiguous annotations: $contiguous\n";
}
sub usage()
@@ -120,15 +120,13 @@ if (!defined $git_dir) {
my $revs = read_log($git_dir);
-if (!$stats) {
- print STDERR "Commits:\n";
- for my $rev (@{$revs}) {
- my $note = $rev->{note};
- chomp ($note);
- my $has_note = ($note ne "");
- my $printit = $all || ($has_note && $notes) || (!$has_note && !$notes);
- print "$rev->{hash}\t$rev->{note}\n" if ($printit);
- }
+print STDERR "Commits:\n";
+for my $rev (@{$revs}) {
+ my $note = $rev->{note};
+ chomp ($note);
+ my $has_note = ($note ne "");
+ my $printit = $all || ($has_note && $notes) || (!$has_note && !$notes);
+ print "$rev->{hash}\t$rev->{note}\t$rev->{name}\t$rev->{subject}\n" if ($printit);
}
if ($stats == 1) {
More information about the Libreoffice-commits
mailing list