Skip to content

Instantly share code, notes, and snippets.

@j1n3l0
Created June 14, 2010 09:05
Show Gist options
  • Save j1n3l0/437468 to your computer and use it in GitHub Desktop.
Save j1n3l0/437468 to your computer and use it in GitHub Desktop.
#!/usr/bin/env perl
use Modern::Perl;
use Test::Most;
=head1 OVERVIEW
Moose will load a class specified via an attributes C<isa> option.
=cut
{
package Foo;
use Moose;
has bar => ( isa => 'REST::Client', is => 'ro' );
}
lives_ok { Foo->new } 'automatically loads REST::Client via isa';
done_testing();
@j1n3l0
Copy link
Author

j1n3l0 commented Jun 15, 2010

This was actually testing the wrong thing. See updated gist here for details.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment