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

[dmn at users.alioth.debian.org]

Author: dmn
Date: Mon Jun 16 19:10:35 2008
New Revision: 21759

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=21759
Log:
fix not detecting arch-dep packages in refresh mode (-R)

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=21759&op=diff
==============================================================================
--- trunk/dh-make-perl/debian/changelog (original)
+++ trunk/dh-make-perl/debian/changelog Mon Jun 16 19:10:35 2008
@@ -8,6 +8,7 @@
   * add --dh <ver> switch, controlling the set of rules files to use and
     desired debhelper compatibility level. Defaults to 5
   * add rules.dh7.{xs,noxs}
+  * fix not detecting arch-dep packages in refresh mode (-R)
 
  -- gregor herrmann <gregoa at debian.org>  Sun, 18 May 2008 16:12:47 +0200
 

Modified: trunk/dh-make-perl/dh-make-perl
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/dh-make-perl?rev=21759&op=diff
==============================================================================
--- trunk/dh-make-perl/dh-make-perl (original)
+++ trunk/dh-make-perl/dh-make-perl Mon Jun 16 19:10:35 2008
@@ -151,6 +151,7 @@
 {
     print "Engaging refresh mode\n";
     $maindir='.';
+    ($pkgname, $version) = extract_basic();  # also detects arch-dep package
     $module_build = (-f "$maindir/Build.PL") ? "Module-Build" : "MakeMaker";
     $debiandir='./debian';
     extract_changelog($maindir);
@@ -199,6 +200,7 @@
 } else {
 	$pkgversion = $opts{version};
 }
+
 move ($tarball, dirname($tarball) . "/${pkgname}_${version}.orig.tar.gz") if ($tarball && $tarball =~ /(?:\.tar\.gz|\.tgz)$/);
 $module_build = (-f "$maindir/Build.PL") ? "Module-Build" : "MakeMaker";
 extract_changelog($maindir);