From: Nicholas Clark <nick@ccl4.org>
Date: Thu, 1 Oct 2009 10:08:11 +0000 (+0100)
Subject: Move t/pod/diag.t to t/porting, as it's really a code consistency test.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f582be01e56575b2efa50b46252c38eacd2bda5b;p=p5sagit%2Fp5-mst-13.2.git

Move t/pod/diag.t to t/porting, as it's really a code consistency test.

It was the last test in t/pod, which allows us to remove the directory.
---

diff --git a/MANIFEST b/MANIFEST
index 2464f95..e7f020b 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -4426,9 +4426,9 @@ t/op/wantarray.t		See if wantarray works
 t/op/write.t			See if write works (formats work)
 t/op/yadayada.t			See if ..., !!! and ??? work
 t/perl.supp			Perl valgrind suppressions
-t/pod/diag.t			Test completeness of perldiag.pod
 t/porting/args_assert.t		Check that all PERL_ARGS_ASSERT* macros are used
 t/porting/checkcase.t	Check whether we are case-insensitive-fs-friendly
+t/porting/diag.t		Test completeness of perldiag.pod
 t/porting/maintainers.t		Test that Porting/Maintaners.pl is up to date
 t/porting/manifest.t		Test that this MANIFEST file is well formed
 t/README			Instructions for regression tests
diff --git a/pod/perlhack.pod b/pod/perlhack.pod
index 0164665..54253fc 100644
--- a/pod/perlhack.pod
+++ b/pod/perlhack.pod
@@ -1806,11 +1806,6 @@ Tests for perl's method resolution order implementations
 Tests for perl's built in functions that don't fit into any of the
 other directories.
 
-=item F<t/pod/>
-
-Tests for POD directives.  There are still some tests for the Pod
-modules hanging around in here that need to be moved out into F<lib/>.
-
 =item F<t/re/>
 
 Tests for regex related functions or behaviour. (These used to live
diff --git a/t/TEST b/t/TEST
index 066ee9d..6cfc031 100755
--- a/t/TEST
+++ b/t/TEST
@@ -406,7 +406,6 @@ unless (@ARGV) {
     # something is that badly wrong.
     push @ARGV, _tests_from_manifest($extensions, $known_extensions);
     unless ($::core) {
-	_find_tests('pod');
 	_find_tests('x2p');
 	_find_tests('porting');
 	_find_tests('japh') if $::torture;
diff --git a/t/harness b/t/harness
index a70c8be..d5099bf 100644
--- a/t/harness
+++ b/t/harness
@@ -160,7 +160,6 @@ if (@ARGV) {
 	use Config;
 	push @last,  sort { lc $a cmp lc $b }
 	    _tests_from_manifest($Config{extensions}, $Config{known_extensions});
-	push @last, <pod/*.t>;
 	push @last, <x2p/*.t>;
 
 	my %times;
diff --git a/t/pod/diag.t b/t/porting/diag.t
similarity index 100%
rename from t/pod/diag.t
rename to t/porting/diag.t