From: Frank Lichtenheld <djpig@debian.org>
Date: Mon, 11 Feb 2008 00:41:55 +0000 (+0100)
Subject: Dpkg::Source::VCS::git: Call git ls-files with -z
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=09386db588344e81f598c8f9dbd57141de4ec844;p=dpkg

Dpkg::Source::VCS::git: Call git ls-files with -z

* scripts/Dpkg/Source/VCS/git.pm(prep_tar): Call git ls-files
with -z to correctly handle filenames with funny characters.
---

diff --git a/scripts/Dpkg/Source/VCS/git.pm b/scripts/Dpkg/Source/VCS/git.pm
index 9caf2410..c7703889 100644
--- a/scripts/Dpkg/Source/VCS/git.pm
+++ b/scripts/Dpkg/Source/VCS/git.pm
@@ -117,15 +117,17 @@ sub prep_tar {
 		push @ignores, "--exclude-from=.git/info/exclude";
 	}
 	open(GIT_LS_FILES, '-|', "git", "ls-files", "--modified", "--deleted",
-	     "--others", @ignores) ||
+	     "-z", "--others", @ignores) ||
 		 subprocerr("git ls-files");
 	my @files;
-	while (<GIT_LS_FILES>) {
-		chomp;
-		if (! length $main::diff_ignore_regexp ||
-		    ! m/$main::diff_ignore_regexp/o) {
-			push @files, $_;
-		}
+	{ local $/ = "\0";
+	  while (<GIT_LS_FILES>) {
+		  chomp;
+		  if (! length $main::diff_ignore_regexp ||
+		      ! m/$main::diff_ignore_regexp/o) {
+		      push @files, $_;
+		  }
+	  }
 	}
 	close(GIT_LS_FILES) || syserr(_g("git ls-files exited nonzero"));
 	if (@files) {