lib/perl/NB/CGI.pm

diff --git a/lib/perl/NB/CGI.pm b/lib/perl/NB/CGI.pm
index ae36dfa1e6cb284c07dd64a28277d98edd014f75..93712ac9c5b8f1021967d909404cec2eb6e222a4 100644 (file)
--- a/lib/perl/NB/CGI.pm
+++ b/lib/perl/NB/CGI.pm
@@ -338,7 +338,7 @@ sub text__tag_func {
                @result = map {"$_\n";} @result;
        }
        # TR
-       elsif ($tagname =~ /^tr$/)
+       elsif ($tagname =~ /^tr$/i)
        {
                # NB 24.10.24 @result = map {"$_|\n";} @result;
                @result = map {"$_\n";} @result;