From 96387221f05f278408930208d6b32fbeda01584b Mon Sep 17 00:00:00 2001
From: joey <joey@a4a2c43b-8ac3-0310-8836-e0e880c912e2>
Date: Sun, 16 Jan 2000 22:50:13 +0000
Subject: [PATCH]    * Patch from Jan Nieuwenhuizen to fix control file
 extraction on      non-debian systems. Not for frozen.

---
 debian/changelog | 7 +++++++
 lib/Fromdeb.pm   | 4 +++-
 2 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/debian/changelog b/debian/changelog
index aeda306..a4d4d67 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,10 @@
+alien (6.55) unstable; urgency=low
+
+  * Patch from Jan Nieuwenhuizen to fix control file extraction on
+    non-debian systems. Not for frozen.
+
+ -- Joey Hess <joeyh@debian.org>  Sun, 16 Jan 2000 14:45:31 -0800
+
 alien (6.54) unstable; urgency=low
 
   * Added metrolink motif diffs from
diff --git a/lib/Fromdeb.pm b/lib/Fromdeb.pm
index fa49902..fa85456 100644
--- a/lib/Fromdeb.pm
+++ b/lib/Fromdeb.pm
@@ -29,7 +29,9 @@ sub GetFields { my ($self,$file)=@_;
 		@control = `dpkg-deb --info $file control`;
 	}
 	else {
-		@control = `ar p $file control.tar.gz | tar Oxzf - control`;
+		# It can have one of two names, depending on the tar 
+		# version the .deb was built from.
+		@control = `ar p $file control.tar.gz | tar Oxzf - control [./]control`;
 	}
 
 	# Parse control file and extract fields.