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 5bd9a06831e64c7f4af0b2df860f6af4ac184a88 Author: Dominique Dumont <d...@debian.org> Date: Sat Dec 26 17:55:24 2015 +0100 scanner: use warning instead of say for user messages --- lib/Dpkg/Copyright/Scanner.pm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lib/Dpkg/Copyright/Scanner.pm b/lib/Dpkg/Copyright/Scanner.pm index 6562812..b137752 100644 --- a/lib/Dpkg/Copyright/Scanner.pm +++ b/lib/Dpkg/Copyright/Scanner.pm @@ -199,7 +199,7 @@ sub scan_files ( %args ) { } } - say "No copyright information found" unless keys %$files; + warn "No copyright information found" unless keys %$files; my $merged_c_info = __squash_copyrights_years (\@copyrights_by_id) ; @@ -253,7 +253,7 @@ sub __pack_copyright ($r) { $span->set_range_as_string($year, $owner); }; if ($@) { - say "Invalid year range in copyright: $r"; + warn "Invalid year range in copyright: $r"; return $r; } } @@ -374,7 +374,7 @@ sub __coalesce_copyright_years($entries, $owners) { $span->set_range_as_string($years[$i], 1); }; if ($@) { - say "Invalid year range: ",$years[$i]; + warn "Invalid year range: ",$years[$i]; return (); } } @@ -466,13 +466,13 @@ sub __load_fill_blank_data ($current_dir) { if ($debian->is_dir) { my @fills = $debian->children(qr/fill\.copyright\.blanks\.yml$/); - say "Note: loading @fills fixes" if @fills and not $quiet; + warn "Note: loading @fills fixes" if @fills and not $quiet; foreach my $file ( @fills) { my $yaml = $file->slurp_utf8; my $data = Load $yaml; foreach my $path (sort keys %$data) { if ($fill_blanks{$path}) { - say "Warning: skipping duplicated fill blank path $path from file $file"; + warn "Warning: skipping duplicated fill blank path $path from file $file"; } else { $fill_blanks{$path} = $data->{$path}; -- 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