reformat
Yuval Kogman [Mon, 20 Apr 2009 15:08:53 +0000 (17:08 +0200)]
lib/Class/MOP/Class.pm
lib/Class/MOP/Class/Immutable/Trait.pm

index 0e0195c..267beba 100644 (file)
@@ -982,10 +982,10 @@ sub _immutable_options {
         inline_constructor => 1,
         inline_destructor  => 0,
         debug              => 0,
-        immutable_trait   => $self->immutable_trait,
-        constructor_name  => $self->constructor_name,
-        constructor_class => $self->constructor_class,
-        destructor_class  => $self->destructor_class,
+        immutable_trait    => $self->immutable_trait,
+        constructor_name   => $self->constructor_name,
+        constructor_class  => $self->constructor_class,
+        destructor_class   => $self->destructor_class,
         @args,
     );
 }
index aaef38f..cd0380f 100644 (file)
@@ -35,7 +35,7 @@ sub get_mutable_metaclass_name { $_[0]{__immutable}{original_class} }
 
 sub immutable_options { %{ $_[0]{__immutable}{options} } }
 
-sub is_mutable { 0 }
+sub is_mutable   { 0 }
 sub is_immutable { 1 }
 
 sub superclasses {
@@ -59,7 +59,7 @@ sub get_all_method_names  { @{ $_[0]{__immutable}{get_all_method_names}  ||= [ s
 sub get_all_attributes    { @{ $_[0]{__immutable}{get_all_attributes}    ||= [ shift->next::method ] } }
 
 sub get_meta_instance     { $_[0]{__immutable}{get_meta_instance} ||= shift->next::method }
-sub get_method_map        { $_[0]{__immutable}{get_method_map} ||= shift->next::method }
+sub get_method_map        { $_[0]{__immutable}{get_method_map}    ||= shift->next::method }
 
 sub add_package_symbol {
     confess "Cannot add package symbols to an immutable metaclass"