From: Dave Rolsky <autarch@urth.org>
Date: Sun, 21 Jun 2009 15:37:33 +0000 (-0500)
Subject: Minor code formatting tweaks
X-Git-Tag: 0.87~11
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0e2a31f0304c4cca7bd2e905d737b48b7bf57ca3;p=gitmo%2FClass-MOP.git

Minor code formatting tweaks
---

diff --git a/lib/Class/MOP/Class.pm b/lib/Class/MOP/Class.pm
index 3dacb03..4e02264 100644
--- a/lib/Class/MOP/Class.pm
+++ b/lib/Class/MOP/Class.pm
@@ -1076,15 +1076,13 @@ sub _immutable_metaclass {
     my $class_name;
 
     if ( $meta_attr and $trait eq $meta_attr->default ) {
-
-       # if the trait is the same as the default we try and pick a predictable
-       # name for the immutable metaclass
-        $class_name = "Class::MOP::Class::Immutable::" . ref($self);
+        # if the trait is the same as the default we try and pick a
+        # predictable name for the immutable metaclass
+        $class_name = 'Class::MOP::Class::Immutable::' . ref($self);
     }
     else {
-        $class_name
-            = join( "::", "Class::MOP::Class::Immutable::CustomTrait", $trait,
-                    "ForMetaClass", ref($self) );
+        $class_name = join '::', 'Class::MOP::Class::Immutable::CustomTrait',
+            $trait, 'ForMetaClass', ref($self);
     }
 
     if ( Class::MOP::is_class_loaded($class_name) ) {