X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=dgit;h=afe209e2f16fa61cf84828b689fc9021c6ab8672;hb=e8682c0c10fc77771695ca693a16342beaf51b89;hp=d1bf2136a6d86550f847e5d071322a3227885864;hpb=242ba73109ae30e7d8849b01f0c668b87d4f4d63;p=dgit.git

diff --git a/dgit b/dgit
index d1bf2136..afe209e2 100755
--- a/dgit
+++ b/dgit
@@ -30,6 +30,8 @@ use File::Path;
 use File::Temp qw(tempdir);
 use File::Basename;
 use Dpkg::Version;
+use Dpkg::Compression;
+use Dpkg::Compression::Process;
 use POSIX;
 use IPC::Open2;
 use Digest::SHA;
@@ -4924,9 +4926,9 @@ sub quiltify_trees_differ ($$;$$$) {
 			unless $oldmode =~ m/^10/;
 		} else {
 		    # creation
-		    die "non-default mode or type\n"
-			unless $newmode =~ m/^100644$/ ||
-			       $oldmode =~ m/^100644$/;
+		    die "creation with non-default mode\n"
+			unless $newmode =~ m/^100644$/ or
+			       $newmode =~ m/^120000$/;
 		}
 	    };
 	    if ($@) {