From: Dave Rolsky <autarch@urth.org>
Date: Tue, 21 Sep 2010 18:39:16 +0000 (-0500)
Subject: No need to duplicate code in parent class
X-Git-Tag: 1.15~122
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9c1922b06e1954b7f359350b67d10ad63e0d89c9;p=gitmo%2FMoose.git

No need to duplicate code in parent class
---

diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/Writer.pm b/lib/Moose/Meta/Method/Accessor/Native/String/Writer.pm
index 22e4ada..d75af68 100644
--- a/lib/Moose/Meta/Method/Accessor/Native/String/Writer.pm
+++ b/lib/Moose/Meta/Method/Accessor/Native/String/Writer.pm
@@ -11,18 +11,6 @@ use base 'Moose::Meta::Method::Accessor::Native::Writer';
 
 sub _new_value {'$_[0]'}
 
-sub _inline_copy_value {
-    my ( $self, $potential_ref ) = @_;
-
-    return q{} unless $self->_value_needs_copy;
-
-    my $code = "my \$potential = ${$potential_ref};";
-
-    ${$potential_ref} = '$potential';
-
-    return $code;
-}
-
 sub _value_needs_copy {
     my $self = shift;