r18410 - in /trunk/dh-make-perl: debian/changelog dh-make-perl

[gregoa-guest at users.alioth.debian.org]

Author: gregoa-guest
Date: Tue Apr  8 17:44:58 2008
New Revision: 18410

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=18410
Log:
Evaluate --arch command line option earlier.

Modified:
    trunk/dh-make-perl/debian/changelog
    trunk/dh-make-perl/dh-make-perl

Modified: trunk/dh-make-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/debian/changelog?rev=18410&op=diff
==============================================================================
--- trunk/dh-make-perl/debian/changelog (original)
+++ trunk/dh-make-perl/debian/changelog Tue Apr  8 17:44:58 2008
@@ -1,3 +1,9 @@
+dh-make-perl (0.43) UNRELEASED; urgency=low
+
+  * Evaluate --arch command line option earlier.
+
+ -- gregor herrmann <gregor+debian at comodo.priv.at>  Tue, 08 Apr 2008 19:44:34 +0200
+
 dh-make-perl (0.42) unstable; urgency=low
 
   * Add a line to actually use the command line option --arch; thanks to

Modified: trunk/dh-make-perl/dh-make-perl
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/dh-make-perl?rev=18410&op=diff
==============================================================================
--- trunk/dh-make-perl/dh-make-perl (original)
+++ trunk/dh-make-perl/dh-make-perl Tue Apr  8 17:44:58 2008
@@ -143,6 +143,8 @@
 
 $opts{exclude} = '(?:\/|^)(?:CVS|.svn)\/' if (!defined $opts{exclude} or
 					  $opts{exclude} eq '');
+
+$arch = $opts{arch} if defined $opts{arch};
 
 if ( $opts{refresh} )
 {
@@ -170,8 +172,6 @@
 my $tarball = setup_dir();
 $meta = process_meta("$maindir/META.yml") if (-f "$maindir/META.yml");
 findbin_fix();
-
-$arch = $opts{arch} if defined $opts{arch};
 
 if (defined $opts{e}) {
   $email = $opts{e};