From 0216bb1b4ebe417d6e9141f75b331cc00a835bd2 Mon Sep 17 00:00:00 2001
From: Stanislaw Pusep <creaktive@gmail.com>
Date: Tue, 4 Jun 2013 12:10:34 -0300
Subject: added Reply::Plugin::DataPrinter

---
 lib/Reply/Plugin/DataPrinter.pm | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 lib/Reply/Plugin/DataPrinter.pm

diff --git a/lib/Reply/Plugin/DataPrinter.pm b/lib/Reply/Plugin/DataPrinter.pm
new file mode 100644
index 0000000..88a3b27
--- /dev/null
+++ b/lib/Reply/Plugin/DataPrinter.pm
@@ -0,0 +1,26 @@
+package Reply::Plugin::DataPrinter;
+use strict;
+use warnings;
+# ABSTRACT: format results using Data::Printer
+
+use base 'Reply::Plugin';
+
+use Data::Printer;
+
+=head1 SYNOPSIS
+
+  ; .replyrc
+  [DataPrinter]
+
+=head1 DESCRIPTION
+
+This plugin uses L<Data::Printer> to format results.
+
+=cut
+
+sub mangle_result {
+    my ($self, @result) = @_;
+    return p(@result, return_value => 'dump');
+}
+
+1;
-- 
cgit v1.2.3-54-g00ecf