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/LexicalPersistence.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/LexicalPersistence.pm')
| -rw-r--r-- | lib/Reply/Plugin/LexicalPersistence.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/Reply/Plugin/LexicalPersistence.pm b/lib/Reply/Plugin/LexicalPersistence.pm index 99c328c..e3bbb9a 100644 --- a/lib/Reply/Plugin/LexicalPersistence.pm +++ b/lib/Reply/Plugin/LexicalPersistence.pm @@ -26,7 +26,6 @@ sub new { my $self = $class->SUPER::new(@_); $self->{env} = {}; - $self->{publisher} = $opts{publisher}; return $self; } @@ -42,7 +41,7 @@ sub compile { %{ peek_sub($code) }, }; - $self->{publisher}->('lexical_environment', default => $self->{env}); + $self->publish('lexical_environment', default => $self->{env}); return $code; } |