[Libreoffice-commits] .: bin/lo-commit-stat
Thorsten Behrens
thorsten at kemper.freedesktop.org
Wed Jun 13 02:21:40 PDT 2012
bin/lo-commit-stat | 11 ++++-------
1 file changed, 4 insertions(+), 7 deletions(-)
New commits:
commit d5e3a6ae448952e71174954671d1cd790f2d0b50
Author: Thorsten Behrens <tbehrens at suse.com>
Date: Wed Jun 13 11:20:47 2012 +0200
No need for fancy string formatting, use plain print
Change-Id: I6886664951e76ce66c991f3657751f79e7896f0b
diff --git a/bin/lo-commit-stat b/bin/lo-commit-stat
index 1a8e6bb..d6b7846 100755
--- a/bin/lo-commit-stat
+++ b/bin/lo-commit-stat
@@ -80,9 +80,6 @@ sub standardize_summary($)
my $first_char = lc($1);
$line =~ s/^./$first_char/;
}
- # print does not like 0% or so
- $line =~ s/%/%%/g;
-
# FIXME: remove do at the end of line
# remove bug numbers
@@ -246,7 +243,7 @@ sub print_summary_in_stat($$$$$$)
# print piece title if not done yet
if ( defined ${$ppiece_title} ) {
- printf $log "${$ppiece_title}\n";
+ print $log, "${$ppiece_title}\n";
${$ppiece_title} = undef;
}
@@ -261,7 +258,7 @@ sub print_summary_in_stat($$$$$$)
$authors = " [" . join (", ", keys %{$pauthors}) . "]";
}
- printf $log $prefix . $summary . $bugs . $authors . "\n";
+ print $log $prefix, $summary, $bugs, $authors, "\n";
}
sub print_stat($$)
@@ -363,7 +360,7 @@ sub print_bugs($$$)
$authors = " [" . join (", ", keys %{$bugs{$bug}{'author'}}) . "]";
}
- printf $log "%s %s%s\n", $convert_func->($bug), $summary, $authors;
+ print $log $convert_func->($bug), " ", $summary, $authors, "\n";
}
}
@@ -381,7 +378,7 @@ sub print_bugnumbers($$)
}
}
- printf $log join ("\n", sort { $a cmp $b } keys %bugs) . "\n";
+ print $log join ("\n", sort { $a cmp $b } keys %bugs), "\n";
}
########################################################################
More information about the Libreoffice-commits
mailing list