diff options
author | Jesse Luehrs <doy@tozt.net> | 2013-06-27 18:21:59 -0400 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2013-06-27 18:21:59 -0400 |
commit | 6bd057874f99aeb2c0d243880f3333a64d96045f (patch) | |
tree | cff8f85b8a3a784a582774b3ab9f160a74032c68 /lib/Reply/Plugin/Packages.pm | |
parent | ca1aa50a460e9a179168dfb211f3e32751f69bb7 (diff) | |
download | reply-6bd057874f99aeb2c0d243880f3333a64d96045f.tar.gz reply-6bd057874f99aeb2c0d243880f3333a64d96045f.zip |
clean up the publisher stuff some more
Diffstat (limited to 'lib/Reply/Plugin/Packages.pm')
-rw-r--r-- | lib/Reply/Plugin/Packages.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lib/Reply/Plugin/Packages.pm b/lib/Reply/Plugin/Packages.pm index 054467a..a206d6e 100644 --- a/lib/Reply/Plugin/Packages.pm +++ b/lib/Reply/Plugin/Packages.pm @@ -26,9 +26,8 @@ sub new { my $self = $class->SUPER::new(@_); $self->{package} = $opts{default_package} || 'main'; - $self->{publisher} = $opts{publisher}; - $self->{publisher}->(package => $self->{package}); + $self->publish('package', $self->{package}); return $self; } @@ -57,7 +56,7 @@ sub compile { # eval_closure's environment parameter since we need to access the # information in a BEGIN block $self->{package} = our $package; - $self->{publisher}->(package => $self->{package}); + $self->publish('package', $self->{package}); return @result; } |