[libconfig-model-dpkg-perl] 03/12: C:M:D:Copyright: don't mess with \n from file fix.scanned.copyright

[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 f38685f96e6a7609a8958108f6f4002b61d5f851
Author: Dominique Dumont <dod at debian.org>
Date:   Wed Apr 1 19:15:38 2015 +0200

    C:M:D:Copyright: don't mess with \n from file fix.scanned.copyright
---
 lib/Config/Model/Dpkg/Copyright.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lib/Config/Model/Dpkg/Copyright.pm b/lib/Config/Model/Dpkg/Copyright.pm
index 71cb7d6..06f25e4 100644
--- a/lib/Config/Model/Dpkg/Copyright.pm
+++ b/lib/Config/Model/Dpkg/Copyright.pm
@@ -161,8 +161,7 @@ sub update ($self, %args) {
         say "Note: loading @fixes fixes from copyright fix files" if @fixes;
         foreach my $fix ( @fixes) {
             my @l = grep { /[^\s]/ } grep { ! m!^(#|//)!  } $fix->lines_utf8;
-            chomp @l;
-            $self->load( "@l" );
+            $self->load( join('', at l) );
         }
     }
 

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