From: Sven Schöling <s.schoeling@linet-services.de>
Date: Mon, 27 Dec 2010 13:02:30 +0000 (+0100)
Subject: L.dump
X-Git-Tag: release-2.6.2beta1~64^2~13
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=f4f55336d3a96ab42f7874f90304e078a6201ff3;p=kivitendo-erp.git

L.dump
---

diff --git a/SL/Template/Plugin/L.pm b/SL/Template/Plugin/L.pm
index 9aead0113..b9098ec1a 100644
--- a/SL/Template/Plugin/L.pm
+++ b/SL/Template/Plugin/L.pm
@@ -397,6 +397,12 @@ EOCODE
   return $code;
 }
 
+sub dump {
+  my $self = shift;
+  require Data::Dumper;
+  return '<pre>' . Data::Dumper::Dumper(@_) . '</pre>';
+}
+
 1;
 
 __END__
@@ -586,6 +592,10 @@ translation of 'Selected'.
 
 =back
 
+=item C<dump REF>
+
+Dumps the Argument using L<Data::Dumper> into a E<lt>preE<gt> block.
+
 =back
 
 =head2 CONVERSION FUNCTIONS