use strict;
use base qw/Class::Data::Inheritable Class::Accessor::Fast/;
+use attributes ();
use UNIVERSAL::require;
use CGI::Cookie;
use Data::Dumper;
if ( my $error = $@ ) {
chomp $error;
- $self->log->error(
- qq/Couldn't initialize "Module::Pluggable::Fast", "$error"/);
+ die qq/Couldn't load components "$error"/;
}
$self->components( {} );
return $self->{stash};
}
+# Takes a coderef and returns an arrayref containing attributes
+sub _get_attrs { attributes::get( $_[0] ) || [] }
+
=back
=head1 AUTHOR