From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Sat, 19 Oct 2024 08:15:58 +0000 (+0200)
Subject: lib/perl/NB/CGI.pm
X-Git-Url: https://git.nbdom.net/?a=commitdiff_plain;h=8701038d27566487f904492c096328bafb7f0432;p=nb.git

lib/perl/NB/CGI.pm
---

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;