X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FPresenter%2FEscapedText.pm;h=c8c78a092f7084b1ed88db8348ab3919e721c8e9;hb=35d63a9fdee45777535d7ec815bfbc76c5c1bdc9;hp=d482e8a304386568b5a400fc2eb43cb223e6766e;hpb=d445880375bce1462b8f9a8b1a502b34c296d41f;p=kivitendo-erp.git

diff --git a/SL/Presenter/EscapedText.pm b/SL/Presenter/EscapedText.pm
index d482e8a30..c8c78a092 100644
--- a/SL/Presenter/EscapedText.pm
+++ b/SL/Presenter/EscapedText.pm
@@ -2,6 +2,8 @@ package SL::Presenter::EscapedText;
 
 use strict;
 
+use JSON ();
+
 use overload '""' => \&escaped;
 
 sub new {
@@ -20,6 +22,10 @@ sub escaped {
   return $self->{text};
 }
 
+sub TO_JSON {
+  goto &escaped;
+}
+
 1;
 __END__