[libconfig-model-dpkg-perl] 04/11: remove dead code

[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 6256249a32802c1160dde7bdc9f080c46a008384
Author: Dominique Dumont <dod at debian.org>
Date:   Tue Jan 10 12:56:48 2017 +0100

    remove dead code
---
 lib/Config/Model/Backend/DpkgStoreRole.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lib/Config/Model/Backend/DpkgStoreRole.pm b/lib/Config/Model/Backend/DpkgStoreRole.pm
index f8dffee..560d6d1 100644
--- a/lib/Config/Model/Backend/DpkgStoreRole.pm
+++ b/lib/Config/Model/Backend/DpkgStoreRole.pm
@@ -47,11 +47,10 @@ sub store_section_list_element ($self, $logger, $list_obj, $check, $v_ref) {
 sub store_section_leaf_element ($self, $logger, $elt_obj, $check, $v_ref) {
     # v_ref is a list of (@comment , [ value, $line_nb ,$note ] )
 
-    my ($l, at v, at comment, at note);
+    my (@v, at comment, at note);
     foreach my $v_item ( $v_ref ->@* ) {
         if (ref $v_item) {
             push @v, $v_item->[0];
-            $l //= $v_item->[1]; # use only first indicated line number
             push @note, $v_item->[2];
         }
         else {

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