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 f9830f3ee03bf67f825f30535416dbdf40104542
Author: Dominique Dumont <d...@debian.org>
Date:   Fri Apr 18 19:47:12 2014 +0200

    removed $get_perl_versions from check_perl_lib_dep
---
 lib/Config/Model/Dpkg/Dependency.pm | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/lib/Config/Model/Dpkg/Dependency.pm 
b/lib/Config/Model/Dpkg/Dependency.pm
index 06d5d6f..d79a622 100644
--- a/lib/Config/Model/Dpkg/Dependency.pm
+++ b/lib/Config/Model/Dpkg/Dependency.pm
@@ -468,16 +468,11 @@ sub check_perl_lib_dep {
     my @ideal_lib_dep ;
     my @ideal_dep_chain = (\@ideal_perl_dep);
 
-    my ($get_perl_versions, $on_get_perl_versions) ;
+    my ($on_get_perl_versions) ;
 
     my ($v_normal) ;
 
 
-    $get_perl_versions = sub {
-        my @res = $self->get_available_version( 'perl');
-               $on_get_perl_versions->(@res) ;
-    } ;
-
     $on_get_perl_versions = sub {
         my %perl_version = @_ ;
         $async_log->debug("running on_get_perl_versions for $actual_dep") ;
@@ -565,7 +560,9 @@ sub check_perl_lib_dep {
                push @ideal_lib_dep, $dep_name;
        }
 
-       $get_perl_versions->();
+       @res = $self->get_available_version( 'perl');
+       $on_get_perl_versions->(@res) ;
+
     return $ret ;
 }
 

-- 
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