From f229537a3ecd9db056c7d315dbbf103a048e10dc Mon Sep 17 00:00:00 2001 From: Leon Brocard Date: Thu, 7 Jul 2011 12:25:16 +0100 Subject: [PATCH] Wrap text with Porting/checkAUTHORS.pl --who option, perfect for inserting into perldelta --- Porting/checkAUTHORS.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Porting/checkAUTHORS.pl b/Porting/checkAUTHORS.pl index 38b24a7..9c6c712 100755 --- a/Porting/checkAUTHORS.pl +++ b/Porting/checkAUTHORS.pl @@ -83,9 +83,9 @@ EOS sub list_authors { my ($patchers, $authors) = @_; binmode(STDOUT, ":utf8"); - print "$_\n" for sort { lc $a cmp lc $b } + print wrap '', '', join(', ', sort { lc $a cmp lc $b } map { $authors->{$_} } - keys %$patchers; + keys %$patchers) . ".\n"; } sub parse_commits_from_stdin { -- 2.7.4