Comments

diff --git a/lib/Mouse/Meta/Role/Composite.pm b/lib/Mouse/Meta/Role/Composite.pm
index 240540b..e5857c6 100644 (file)
--- a/lib/Mouse/Meta/Role/Composite.pm
+++ b/lib/Mouse/Meta/Role/Composite.pm
@@ -4,6 +4,11 @@ use Mouse::Meta::Role;
 use Mouse::Meta::Role::Application;
 our @ISA = qw(Mouse::Meta::Role);
 
+# FIXME: Mouse::Meta::Role::Composite does things in different way from Moose's
+# Moose: creates a new class for the consumer, and applies roles to it.
+# Mouse: creates a coposite role and apply roles to the role,
+#        and then applies it to the consumer.
+
 sub new {
     my $class = shift;
     my $args  = $class->Mouse::Object::BUILDARGS(@_);
@@ -18,12 +23,6 @@ sub new {
     return $self;
 }
 
-sub apply_params {
-    #my($self, $role_params) = @_;
-    # TODO
-    return $_[0];
-}
-
 sub get_method_list {
     my($self) = @_;
     return keys %{ $self->{methods} };