From: Nicholas Clark <nick@ccl4.org>
Date: Sun, 11 Oct 2009 17:56:01 +0000 (+0100)
Subject: porting/manifest.t now tests that all files listed in MANIFEST are present.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=04e82a462b85b3d6265b04aa07a405316616dc66;p=p5sagit%2Fp5-mst-13.2.git

porting/manifest.t now tests that all files listed in MANIFEST are present.
---

diff --git a/t/porting/manifest.t b/t/porting/manifest.t
index 377f666..97d320b 100644
--- a/t/porting/manifest.t
+++ b/t/porting/manifest.t
@@ -23,6 +23,8 @@ while (<$m>) {
     next unless /\s/;   # Ignore lines without whitespace (i.e., filename only)
     my ($file, $separator) = /^(\S+)(\s+)/;
     isnt($file, undef, "Line $. doesn't start with a blank") or next;
+    # Remember, we're running from t/
+    ok(-f "../$file", "File $file exists");
     if ($separator !~ tr/\t//c) {
 	# It's all tabs
 	next;