document rt ticket for overload::constant weirdness

[scpubgit/HTML-String.git] / lib / HTML / String / TT / Directive.pm

diff --git a/lib/HTML/String/TT/Directive.pm b/lib/HTML/String/TT/Directive.pm
index 726acfe..770f5fa 100644 (file)
--- a/lib/HTML/String/TT/Directive.pm
+++ b/lib/HTML/String/TT/Directive.pm
@@ -11,11 +11,15 @@ sub template {
     } Template::Directive::pad(shift->SUPER::template(@_), 2);
 }
 
+# TT code does &text(), no idea why
+
 sub textblock {
     my ($self, $text) = @_;
     return $Template::Directive::OUTPUT.' '.$self->text($text).';';
 }
 
+# https://rt.perl.org/rt3/Ticket/Display.html?id=49594
+
 sub text {
     my ($class, $text) = @_;
     for ($text) {