X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/42dfa9a7030e7d06288385076e348d34ec809128..7647d46:/SL/Presenter/EscapedText.pm 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__