[libconfig-model-dpkg-perl] 06/33: Scanner: improve format of copyright outputs

[dod at debian.org]

This is an automated email from the git hooks/post-receive script.

dod pushed a commit to branch master
in repository libconfig-model-dpkg-perl.

commit 51ad379541f31e79c41b699e4b7255de21c331e8
Author: Dominique Dumont <dod at debian.org>
Date:   Tue Mar 24 20:51:44 2015 +0100

    Scanner: improve format of copyright outputs
---
 lib/Dpkg/Copyright/Scanner.pm | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/lib/Dpkg/Copyright/Scanner.pm b/lib/Dpkg/Copyright/Scanner.pm
index 97e275f..c31d109 100644
--- a/lib/Dpkg/Copyright/Scanner.pm
+++ b/lib/Dpkg/Copyright/Scanner.pm
@@ -169,7 +169,6 @@ sub __pack_copyright ($r) {
         $cop{$owner} ||= [] ;
         push $cop{$owner}->@*, @data ;
     }
-
     my @res ;
     foreach my $owner (sort keys %cop) {
         my $span = Array::IntSpan->new();
@@ -181,8 +180,7 @@ sub __pack_copyright ($r) {
         $span->consolidate();
         push @res, $span->get_range_list. ', '. $owner;
     }
-
-    return join("\n  ",reverse sort @res);
+    return join("\n ",reverse sort @res);
 }
 
 #in each directory, pack files that have the same copyright/license information
@@ -269,7 +267,7 @@ sub __squash_copyrights_years ($files, $copyrights_by_id) {
         }
 
         my $new_id = @$copyrights_by_id + @merged_c_info ;
-        $copyrights_by_id->[$new_id] = [ join("\n  ", at squashed_c), $l ];
+        $copyrights_by_id->[$new_id] = [ join("\n ", at squashed_c), $l ];
         foreach my $id (@ids) {
             $merged_c_info[$id] = $new_id;
         }

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libconfig-model-dpkg-perl.git