diff options
author | Thorsten Behrens <tbehrens@suse.com> | 2012-06-13 11:20:47 +0200 |
---|---|---|
committer | Thorsten Behrens <tbehrens@suse.com> | 2012-06-13 11:21:27 +0200 |
commit | d5e3a6ae448952e71174954671d1cd790f2d0b50 (patch) | |
tree | 5a770e629d1fffa5da5771892cb0fb91af86fde9 /bin | |
parent | 88c5283de195a7e56b2d9e0fc376972e05faf40c (diff) |
No need for fancy string formatting, use plain print
Change-Id: I6886664951e76ce66c991f3657751f79e7896f0b
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/lo-commit-stat | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/bin/lo-commit-stat b/bin/lo-commit-stat index 1a8e6bbae930..d6b7846ca5bb 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"; } ######################################################################## |