From: Nicholas Clark <nick@ccl4.org>
Date: Sun, 30 Aug 2009 11:30:40 +0000 (+0100)
Subject: Break out B::Lint into its own directory in ext.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cb122419900b9557dec6ea26a5765f6e72a8fa13;p=p5sagit%2Fp5-mst-13.2.git

Break out B::Lint into its own directory in ext.
---

diff --git a/MANIFEST b/MANIFEST
index 789e822..ef4f43d 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -84,8 +84,6 @@ ext/attributes/attributes.xs		For "sub foo : attrlist"
 ext/B/B/Concise.pm	Compiler Concise backend
 ext/B/B/Debug.pm	Compiler Debug backend
 ext/B/B/Deparse.pm	Compiler Deparse backend
-ext/B/B/Lint/Debug.pm	Adds debugging stringification to B::
-ext/B/B/Lint.pm		Compiler Lint backend
 ext/B/B.pm		Compiler backend support functions and methods
 ext/B/B/Showlex.pm	Compiler Showlex backend
 ext/B/B/Terse.pm	Compiler Terse backend
@@ -94,6 +92,10 @@ ext/B/B.xs		Compiler backend external subroutines
 ext/B/defsubs_h.PL	Generator for constant subroutines
 ext/B/hints/darwin.pl	Hints for named architecture
 ext/B/hints/openbsd.pl	Hints for named architecture
+ext/B-Lint/lib/B/Lint/Debug.pm	Adds debugging stringification to B::
+ext/B-Lint/lib/B/Lint.pm	Compiler Lint backend
+ext/B-Lint/t/lint.t		See if B::Lint works
+ext/B-Lint/t/pluglib/B/Lint/Plugin/Test.pm	See if B::Lint works
 ext/B/Makefile.PL	Compiler backend makefile writer
 ext/B/O.pm		Compiler front-end module (-MO=...)
 ext/B/t/b.t		See if B works
@@ -105,7 +107,6 @@ ext/B/t/f_map			code from perldoc -f map
 ext/B/t/f_map.t			converted to optreeCheck()s
 ext/B/t/f_sort			optree test raw material
 ext/B/t/f_sort.t		optree test raw material
-ext/B/t/lint.t		See if B::Lint works
 ext/B/t/OptreeCheck.pm		optree comparison tool
 ext/B/t/optree_check.t		test OptreeCheck apparatus
 ext/B/t/optree_concise.t	more B::Concise tests
@@ -116,7 +117,6 @@ ext/B/t/optree_sort.t		inplace sort optimization regression
 ext/B/t/optree_specials.t	BEGIN, END, etc code
 ext/B/t/optree_varinit.t	my,our,local var init optimization
 ext/B/t/o.t		See if O works
-ext/B/t/pluglib/B/Lint/Plugin/Test.pm	See if B::Lint works
 ext/B/t/pragma.t	See if user pragmas work.
 ext/B/t/showlex.t	See if B::ShowLex works
 ext/B/t/terse.t		See if B::Terse works
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index 6c84da8..f83ad7d 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -274,15 +274,8 @@ package Maintainers;
 	{
 	'MAINTAINER'	=> 'jjore',
 	'DISTRIBUTION'	=> 'JJORE/B-Lint-1.11.tar.gz',
-	'FILES'		=> q[ext/B/B/Lint.pm
-			     ext/B/t/lint.t
-			     ext/B/B/Lint/Debug.pm
-			     ext/B/t/pluglib/B/Lint/Plugin/Test.pm
-			    ],
+	'FILES'		=> q[ext/B-Lint],
 	'EXCLUDED'	=> [ qw( t/test.pl ) ],
-	'MAP'		=> { 'lib/B/'	=> 'ext/B/B/',
-			     't/'	=> 'ext/B/t/',
-			   },
 	'CPAN'		=> 1,
 	'UPSTREAM'	=> undef,
 	},
diff --git a/ext/B/B/Lint.pm b/ext/B-Lint/lib/B/Lint.pm
similarity index 100%
rename from ext/B/B/Lint.pm
rename to ext/B-Lint/lib/B/Lint.pm
diff --git a/ext/B/B/Lint/Debug.pm b/ext/B-Lint/lib/B/Lint/Debug.pm
similarity index 100%
rename from ext/B/B/Lint/Debug.pm
rename to ext/B-Lint/lib/B/Lint/Debug.pm
diff --git a/ext/B/t/lint.t b/ext/B-Lint/t/lint.t
similarity index 95%
rename from ext/B/t/lint.t
rename to ext/B-Lint/t/lint.t
index efe4ff7..0727114 100644
--- a/ext/B/t/lint.t
+++ b/ext/B-Lint/t/lint.t
@@ -1,14 +1,8 @@
 #!./perl -w
 
 BEGIN {
-    if ( $ENV{PERL_CORE} ) {
-        chdir('t') if -d 't';
-        @INC = ( '.', '../lib' );
-    }
-    else {
-        unshift @INC, 't';
-        push @INC, "../../t";
-    }
+    unshift @INC, 't';
+    push @INC, "../../t";
     require Config;
     if ( ( $Config::Config{'extensions'} !~ /\bB\b/ ) ) {
         print "1..0 # Skip -- Perl configured without B module\n";
diff --git a/ext/B/t/pluglib/B/Lint/Plugin/Test.pm b/ext/B-Lint/t/pluglib/B/Lint/Plugin/Test.pm
similarity index 100%
rename from ext/B/t/pluglib/B/Lint/Plugin/Test.pm
rename to ext/B-Lint/t/pluglib/B/Lint/Plugin/Test.pm