diff options
Diffstat (limited to 'lib/Reply/Plugin/DataPrinter.pm')
-rw-r--r-- | lib/Reply/Plugin/DataPrinter.pm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lib/Reply/Plugin/DataPrinter.pm b/lib/Reply/Plugin/DataPrinter.pm index f048a47..05328db 100644 --- a/lib/Reply/Plugin/DataPrinter.pm +++ b/lib/Reply/Plugin/DataPrinter.pm @@ -1,9 +1,9 @@ -package Reply::Plugin::DataPrinter; +package main; use strict; use warnings; # ABSTRACT: format results using Data::Printer -use base 'Reply::Plugin'; +use mop; use Data::Printer alias => 'p', colored => 1; @@ -18,9 +18,10 @@ This plugin uses L<Data::Printer> to format results. =cut -sub mangle_result { - my ($self, @result) = @_; - return p(@result, return_value => 'dump'); +class Reply::Plugin::DataPrinter extends Reply::Plugin { + method mangle_result (@result) { + return p(@result, return_value => 'dump'); + } } 1; |