Commit | Line | Data |
---|---|---|
443f4253 | 1 | package MooseX::Singleton; |
109b110b | 2 | use Moose; |
3 | use MooseX::Singleton::Object; | |
4 | use MooseX::Singleton::Meta::Class; | |
443f4253 | 5 | |
14676933 | 6 | our $VERSION = 0.02; |
443f4253 | 7 | |
109b110b | 8 | sub import { |
9 | my $caller = caller; | |
443f4253 | 10 | |
109b110b | 11 | Moose::init_meta($caller, 'MooseX::Singleton::Object', 'MooseX::Singleton::Meta::Class'); |
443f4253 | 12 | |
109b110b | 13 | Moose->import({into => $caller}); |
14 | strict->import; | |
15 | warnings->import; | |
443f4253 | 16 | |
443f4253 | 17 | } |
18 | ||
19 | 1; | |
20 |