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

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

diff --git a/MANIFEST b/MANIFEST
index ef4f43d..38d30a2 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -83,13 +83,14 @@ ext/attributes/attributes.pm		For "sub foo : attrlist"
 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.pm		Compiler backend support functions and methods
 ext/B/B/Showlex.pm	Compiler Showlex backend
 ext/B/B/Terse.pm	Compiler Terse backend
 ext/B/B/Xref.pm		Compiler Xref backend
 ext/B/B.xs		Compiler backend external subroutines
 ext/B/defsubs_h.PL	Generator for constant subroutines
+ext/B-Deparse/Deparse.pm	Compiler Deparse backend
+ext/B-Deparse/t/deparse.t	See if B::Deparse works
 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::
@@ -102,7 +103,6 @@ ext/B/t/b.t		See if B works
 ext/B/t/concise.t	See whether B::Concise works
 ext/B/t/concise-xs.t	See whether B::Concise recognizes XS functions
 ext/B/t/debug.t		See if B::Debug works
-ext/B/t/deparse.t	See if B::Deparse works
 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
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index f83ad7d..4fab2dd 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -265,7 +265,7 @@ package Maintainers;
     'B::Deparse' =>
 	{
 	'MAINTAINER'	=> 'smccam',
-	'FILES'		=> q[ext/B/B/Deparse.pm ext/B/t/deparse.t],
+	'FILES'		=> q[ext/B-Deparse],
 	'CPAN'		=> 0,
 	'UPSTREAM'	=> undef,
 	},
diff --git a/ext/B/B/Deparse.pm b/ext/B-Deparse/Deparse.pm
similarity index 100%
rename from ext/B/B/Deparse.pm
rename to ext/B-Deparse/Deparse.pm
diff --git a/ext/B/t/deparse.t b/ext/B-Deparse/t/deparse.t
similarity index 98%
rename from ext/B/t/deparse.t
rename to ext/B-Deparse/t/deparse.t
index 0f87ea4..c9c92f9 100644
--- a/ext/B/t/deparse.t
+++ b/ext/B-Deparse/t/deparse.t
@@ -1,13 +1,7 @@
 #!./perl
 
 BEGIN {
-    if ($ENV{PERL_CORE}){
-	chdir('t') if -d 't';
-	@INC = '.';
-	push @INC, '../lib';
-    } else {
-	unshift @INC, 't';
-    }
+    unshift @INC, 't';
     require Config;
     if (($Config::Config{'extensions'} !~ /\bB\b/) ){
         print "1..0 # Skip -- Perl configured without B module\n";