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 bec09e114cfcc3a195a8f2c7b4ce153e9150c299 Author: Dominique Dumont <d...@debian.org> Date: Tue Jan 31 19:01:28 2017 +0100 rename variable in test file --- t/model_tests.d/dpkg-test-conf.pl | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/t/model_tests.d/dpkg-test-conf.pl b/t/model_tests.d/dpkg-test-conf.pl index 0a00976..afd1d9c 100644 --- a/t/model_tests.d/dpkg-test-conf.pl +++ b/t/model_tests.d/dpkg-test-conf.pl @@ -9,7 +9,7 @@ $model_to_test = "Dpkg"; eval { require AptPkg::Config; }; $skip = ( $@ or not -r '/etc/debian_version' ) ? 1 : 0; -my $del_home = sub { +my $add_home = sub { my $r = shift ; my $home = File::HomeDir->my_home; # Works also on Windows push @$r, "$home/.dpkg-meta.yml" ; @@ -19,7 +19,7 @@ my $del_home = sub { { name => 't0', check => { 'control source Build-Depends-Indep:3', 'libtest-pod-perl', }, - file_check_sub => $del_home, + file_check_sub => $add_home, apply_fix => 1 , }, { name => 't1', @@ -38,7 +38,7 @@ my $del_home = sub { 'compat' => 8 , # test setup 'control source Build-Depends:0' => 'debhelper (>= 8)' , }, - file_check_sub => $del_home, + file_check_sub => $add_home, # dump_warnings => [ (qr/deprecated/) x 3 ], }, @@ -49,7 +49,7 @@ my $del_home = sub { 'control source Build-Depends-Indep:0', => 'perl', 'control source Build-Depends-Indep:1', => 'libdist-zilla-perl', }, - file_check_sub => $del_home, + file_check_sub => $add_home, }, { name => 'pan-copyright-from-scratch', @@ -69,7 +69,7 @@ my $del_home = sub { "copyright License:GPL-2 text" => {value => undef, mode => 'custom'}, "copyright License:GPL-2 text" => qr/GNU/, }, - file_check_sub => $del_home, + file_check_sub => $add_home, }, { # should that be pan-copyright-upgrate ? :-p @@ -95,7 +95,7 @@ my $del_home = sub { "copyright License:GPL-2 text" => {value => undef, mode => 'custom'}, "copyright License:GPL-2 text" => qr/GNU/, }, - file_check_sub => $del_home, + file_check_sub => $add_home, }, { # emulate removed and added file, updated copyright years @@ -125,7 +125,7 @@ my $del_home = sub { "copyright License:GPL-2 text" => {value => undef, mode => 'custom'}, "copyright License:GPL-2 text" => qr/GNU/, }, - file_check_sub => $del_home, + file_check_sub => $add_home, }, { @@ -137,7 +137,7 @@ my $del_home = sub { qr!Files: src/im_mad/remotes/az.d/\*! ] }, - file_check_sub => $del_home, + file_check_sub => $add_home, file_contents_unlike => { 'debian/copyright' => [ qr!Files: src/im_mad/\*!, @@ -158,7 +158,7 @@ my $del_home = sub { qr!Files: src/im_mad/remotes/az.d/\*! ] }, - file_check_sub => $del_home, + file_check_sub => $add_home, # check that some entries were fixed by update check => { 'copyright Files:"share/vendor/*" Copyright' => '2010-2012, VMware, Inc.', @@ -182,7 +182,7 @@ my $del_home = sub { 'copyright Files:"modules/Perl6-MIME-Base64/*" Copyright' => 'Adrian White', 'copyright Files:"modules/DBIish/*" Comment' => qr/should be preserved by cme update/, }, - file_check_sub => $del_home, + file_check_sub => $add_home, }, ); -- 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