From: Dave Rolsky <autarch@urth.org>
Date: Tue, 21 Sep 2010 17:57:22 +0000 (-0500)
Subject: Remove some empty classes in the String hierarchy
X-Git-Tag: 1.15~128
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9377e13ab38cf8f8a61720357fb6c26c9b284434;p=gitmo%2FMoose.git

Remove some empty classes in the String hierarchy
---

diff --git a/lib/Moose/Meta/Method/Accessor/Native/String.pm b/lib/Moose/Meta/Method/Accessor/Native/String.pm
deleted file mode 100644
index 3cdf6f5..0000000
--- a/lib/Moose/Meta/Method/Accessor/Native/String.pm
+++ /dev/null
@@ -1,10 +0,0 @@
-package Moose::Meta::Method::Accessor::Native::String;
-
-use strict;
-use warnings;
-
-our $VERSION = '1.13';
-$VERSION = eval $VERSION;
-our $AUTHORITY = 'cpan:STEVAN';
-
-1;
diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/Reader.pm b/lib/Moose/Meta/Method/Accessor/Native/String/Reader.pm
deleted file mode 100644
index 70084b1..0000000
--- a/lib/Moose/Meta/Method/Accessor/Native/String/Reader.pm
+++ /dev/null
@@ -1,15 +0,0 @@
-package Moose::Meta::Method::Accessor::Native::String::Reader;
-
-use strict;
-use warnings;
-
-our $VERSION = '1.13';
-$VERSION = eval $VERSION;
-our $AUTHORITY = 'cpan:STEVAN';
-
-use base qw(
-    Moose::Meta::Method::Accessor::Native::String
-    Moose::Meta::Method::Accessor::Native::Reader
-);
-
-1;
diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/Writer.pm b/lib/Moose/Meta/Method/Accessor/Native/String/Writer.pm
index 8293e91..22e4ada 100644
--- a/lib/Moose/Meta/Method/Accessor/Native/String/Writer.pm
+++ b/lib/Moose/Meta/Method/Accessor/Native/String/Writer.pm
@@ -7,10 +7,7 @@ our $VERSION = '1.13';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
-use base qw(
-    Moose::Meta::Method::Accessor::Native::String
-    Moose::Meta::Method::Accessor::Native::Writer
-);
+use base 'Moose::Meta::Method::Accessor::Native::Writer';
 
 sub _new_value {'$_[0]'}
 
diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/length.pm b/lib/Moose/Meta/Method/Accessor/Native/String/length.pm
index c73238d..72500e8 100644
--- a/lib/Moose/Meta/Method/Accessor/Native/String/length.pm
+++ b/lib/Moose/Meta/Method/Accessor/Native/String/length.pm
@@ -7,7 +7,7 @@ our $VERSION = '1.13';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
-use base 'Moose::Meta::Method::Accessor::Native::String::Reader';
+use base 'Moose::Meta::Method::Accessor::Native::Reader';
 
 sub _minimum_arguments { 0 }
 sub _maximum_arguments { 0 }
diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/match.pm b/lib/Moose/Meta/Method/Accessor/Native/String/match.pm
index 00996bd..bd05e96 100644
--- a/lib/Moose/Meta/Method/Accessor/Native/String/match.pm
+++ b/lib/Moose/Meta/Method/Accessor/Native/String/match.pm
@@ -7,7 +7,7 @@ our $VERSION = '1.13';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
-use base 'Moose::Meta::Method::Accessor::Native::String::Reader';
+use base 'Moose::Meta::Method::Accessor::Native::Reader';
 
 sub _minimum_arguments { 1 }
 sub _maximum_arguments { 1 }
diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm b/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm
index 2dd8c42..77338f5 100644
--- a/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm
+++ b/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm
@@ -8,7 +8,7 @@ $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
 use base qw(
-    Moose::Meta::Method::Accessor::Native::String::Reader
+    Moose::Meta::Method::Accessor::Native::Reader
     Moose::Meta::Method::Accessor::Native::String::Writer
 );