[Reproducible-commits] [dpkg] 29/90: Dpkg::Changelog::Parse: Move options setup to changelog_parse_plugin start

[Jérémy Bobbio]

This is an automated email from the git hooks/post-receive script.

lunar pushed a commit to branch pu/reproducible_builds
in repository dpkg.

commit 06f6460c855992021c727faffc29e1c81ca5cd80
Author: Guillem Jover <guillem at debian.org>
Date:   Wed Jul 29 00:56:49 2015 +0200

    Dpkg::Changelog::Parse: Move options setup to changelog_parse_plugin start
---
 scripts/Dpkg/Changelog/Parse.pm | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/scripts/Dpkg/Changelog/Parse.pm b/scripts/Dpkg/Changelog/Parse.pm
index dc5b874..cd0891a 100644
--- a/scripts/Dpkg/Changelog/Parse.pm
+++ b/scripts/Dpkg/Changelog/Parse.pm
@@ -80,6 +80,11 @@ it is passed as the parameter that follows.
 
 sub changelog_parse_plugin {
     my (%options) = @_;
+
+    # Setup and sanity checks.
+    $options{file} //= 'debian/changelog';
+    my $changelogfile = $options{file};
+
     my @parserpath = ('/usr/local/lib/dpkg/parsechangelog',
                       "$Dpkg::LIBDIR/parsechangelog",
                       '/usr/lib/dpkg/parsechangelog');
@@ -98,10 +103,6 @@ sub changelog_parse_plugin {
 	$force = 1;
     }
 
-    # Set a default filename
-    $options{file} //= 'debian/changelog';
-    my $changelogfile = $options{file};
-
     # Extract the format from the changelog file if possible
     unless ($force or ($changelogfile eq '-')) {
 	local $_;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/reproducible/dpkg.git