use UNIVERSAL::ref to make TT internals be less stupid

[scpubgit/HTML-String.git] / lib / HTML / String / Value.pm

diff --git a/lib/HTML/String/Value.pm b/lib/HTML/String/Value.pm
index 46181d4..99a1284 100644 (file)
--- a/lib/HTML/String/Value.pm
+++ b/lib/HTML/String/Value.pm
@@ -1,6 +1,7 @@
 package HTML::String::Value;
 
 use strictures 1;
+use UNIVERSAL::ref;
 use Safe::Isa;
 use Data::Munge;
 
@@ -124,4 +125,6 @@ sub clone {
     return ref($self)->new(@{$self->{parts}});
 }
 
+sub ref { '' }
+
 1;