bump version

[scpubgit/HTML-String.git] / t / simple.t

diff --git a/t/simple.t b/t/simple.t
index 0b5e2c3..cb788ab 100644 (file)
--- a/t/simple.t
+++ b/t/simple.t
@@ -54,5 +54,13 @@ my $expected_output = q{<tag>&lt;&gt;&amp;&quot;&#39;</tag>};
 my $html = html('<tag>').$raw_characters.html('</tag>');
 is($html, $expected_output);
 
+ok(HTML::String::Value->isa('HTML::String::Value'), 'isa on class ok');
+
+is($@, '', '$@ not set by check');
+
+is do {
+    use HTML::String::Overload;
+    '' . '0'
+}, '0', 'concatenating strings which are false in boolean context';
 
 done_testing;