From: Dave Rolsky <autarch@urth.org>
Date: Thu, 11 Sep 2008 16:36:35 +0000 (+0000)
Subject: Clarify the chain-following properties of the various original_* accessors
X-Git-Tag: 0.66~3^2~7
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2f01122766dff891311a5c4aa6a60d3d48f0db1e;p=gitmo%2FClass-MOP.git

Clarify the chain-following properties of the various original_* accessors
---

diff --git a/lib/Class/MOP/Method.pm b/lib/Class/MOP/Method.pm
index 729d0aa..59ee23d 100644
--- a/lib/Class/MOP/Method.pm
+++ b/lib/Class/MOP/Method.pm
@@ -209,16 +209,27 @@ object, this returns the object that was cloned.
 This returns the original name of the CODE reference, wherever it was
 first defined.
 
+If this method is a clone of a clone (of a clone, etc.), this method
+returns the name from the I<first> method in the chain of clones.
+
 =item B<original_package_name>
 
 This returns the original package name that the CODE reference is
 attached to, wherever it was first defined.
 
+If this method is a clone of a clone (of a clone, etc.), this method
+returns the package name from the I<first> method in the chain of
+clones.
+
 =item B<original_fully_qualified_name>
 
 This returns the original fully qualified name of the CODE reference,
 wherever it was first defined.
 
+If this method is a clone of a clone (of a clone, etc.), this method
+returns the fully qualified name from the I<first> method in the chain
+of clones.
+
 =back
 
 =head2 Metaclass