From: Dave Rolsky <autarch@urth.org>
Date: Mon, 6 Sep 2010 14:59:45 +0000 (-0500)
Subject: Clarify comment for new code
X-Git-Tag: 1.08~4
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1a36fc73db32e3813b964d01b41c69996ef1af92;p=gitmo%2FClass-MOP.git

Clarify comment for new code
---

diff --git a/lib/Class/MOP/Mixin/HasMethods.pm b/lib/Class/MOP/Mixin/HasMethods.pm
index fd85003..86ab792 100644
--- a/lib/Class/MOP/Mixin/HasMethods.pm
+++ b/lib/Class/MOP/Mixin/HasMethods.pm
@@ -161,8 +161,8 @@ sub get_method_list {
 
     my $namespace = $self->namespace;
 
-    # Constants may show up as some sort of reference in the namespace hash
-    # ref, depending on the Perl version.
+    # Constants may show up as some sort of non-GLOB reference in the
+    # namespace hash ref, depending on the Perl version.
     return grep {
         defined $namespace->{$_}
             && ( ref( \$namespace->{$_} ) ne 'GLOB'