diff --git a/Alien/Package/Deb.pm b/Alien/Package/Deb.pm
index 8af71d1..02f8634 100644
--- a/Alien/Package/Deb.pm
+++ b/Alien/Package/Deb.pm
@@ -251,7 +251,7 @@ sub prep {
 	if (defined $this->patchfile) {
 		# The -f passed to zcat makes it pass uncompressed files
 		# through without error.
-		system("zcat -f ".$this->patchfile." | (cd $dir; patch -p1)") ||
+		system("zcat -f ".$this->patchfile." | (cd $dir; patch -p1)") &&
 			die "patch error: $!";
 		# Look for .rej files.
 		die "patch failed with .rej files; giving up"
diff --git a/debian/changelog b/debian/changelog
index f38a33c..794f49f 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+alien (7.1) unstable; urgency=low
+
+  * Corrected checking of system() in Deb::prep. Closes: #63396
+
+ -- Joey Hess <joeyh@debian.org>  Mon,  1 May 2000 19:42:01 -0700
+
 alien (7.0) unstable; urgency=low
 
   * This is a fully rewritten version, now belived to be stable enough for