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 (file)
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 (file)
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 (file)
--- 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 (file)
--- 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 (file)
--- 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 (file)
--- 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
 );