[p5sagit/Devel-REPL.git] / lib / Devel / REPL / Plugin.pm

package Devel::REPL::Plugin;

use strict;
use warnings;
use Devel::REPL::Meta::Plugin;
use Moose::Role ();

sub import {
  my $target = caller;
  my $meta = Devel::REPL::Meta::Plugin->initialize($target);
  $meta->Moose::Meta::Class::add_method('meta' => sub { $meta });
  goto &Moose::Role::import;
}

1;
Commit	Line	Data
4d33251a	1	package Devel::REPL::Plugin;
	2
	3	use strict;
	4	use warnings;
	5	use Devel::REPL::Meta::Plugin;
	6	use Moose::Role ();
	7
	8	sub import {
	9	my $target = caller;
	10	my $meta = Devel::REPL::Meta::Plugin->initialize($target);
	11	$meta->Moose::Meta::Class::add_method('meta' => sub { $meta });
	12	goto &Moose::Role::import;
	13	}
	14
	15	1;