From 8701038d27566487f904492c096328bafb7f0432 Mon Sep 17 00:00:00 2001
From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Sat, 19 Oct 2024 10:15:58 +0200
Subject: [PATCH] lib/perl/NB/CGI.pm

---
 lib/perl/NB/CGI.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lib/perl/NB/CGI.pm b/lib/perl/NB/CGI.pm
index 14bca950..c5e7ef83 100644
--- a/lib/perl/NB/CGI.pm
+++ b/lib/perl/NB/CGI.pm
@@ -251,6 +251,10 @@ sub text {
 	return $TEXT_OUTPUT;
 }
 
+sub eot {
+	return ($TEXT_OUTPUT ? "" : "\n");
+}
+
 sub script_code {
 	my ($self,@p) = @_;
 	return $self->_script(@p);
@@ -330,7 +334,7 @@ sub text__tag_func {
 	{
 		@result = map {"$_|\n";} @result;
 	}
-	# TD
+	# TD, TH
 	elsif ($tagname =~ /^(start_)?(td|th)$/)
 	{
 		@result = map {"|$_";} @result;
-- 
2.47.3