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 9a701da39bfab7db6db261ba39ae3155b9038c4c
Author: Dominique Dumont <d...@debian.org>
Date:   Sat Mar 28 10:32:12 2015 +0100

    copyright backend: avoid undef warning
---
 lib/Config/Model/Backend/Dpkg/Copyright.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Config/Model/Backend/Dpkg/Copyright.pm 
b/lib/Config/Model/Backend/Dpkg/Copyright.pm
index 323b5b7..79975d5 100644
--- a/lib/Config/Model/Backend/Dpkg/Copyright.pm
+++ b/lib/Config/Model/Backend/Dpkg/Copyright.pm
@@ -387,7 +387,7 @@ sub write {
         my $local_data_ref = { one => \@section, all => $data_ref->{all} } ;
         foreach my $elt (@element_list) { 
             if ($elt eq 'text') {
-                $section[1] .= $node->fetch_element_value($elt);
+                $section[1] .= $node->fetch_element_value($elt) // '';
             }
             else {
                 $scanner->scan_element($local_data_ref, $node,$elt);

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

_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits

Reply via email to