From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Tue, 1 Sep 2026 18:09:11 +0000 (+0200)
Subject: lib/perl/NB/CGI.pm
X-Git-Url: https://git.nbdom.net/?a=commitdiff_plain;h=41a999df32e423d6ddf743bbd4bbe75865d35081;p=nb.git

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

diff --git a/lib/perl/NB/CGI.pm b/lib/perl/NB/CGI.pm
index 7c2ae28a..e2d30df5 100644
--- a/lib/perl/NB/CGI.pm
+++ b/lib/perl/NB/CGI.pm
@@ -34,15 +34,6 @@ sub new {
 	return $cgi;
 }
 
-# NB 06.12.23 sub textOutput {
-	# NB 06.12.23 $TEXT_OUTPUT = 1;
-	# NB 06.12.23 $CGI::CRLF = '';
-# NB 06.12.23 {
-	# NB 06.12.23 no warnings 'redefine';
-	# NB 06.12.23 no warnings 'once';
-# NB 06.12.23 }
-# NB 06.12.23 }
-
 sub status_msg {
 	my %status_codes = (
 		100 => "Continue",
@@ -415,6 +406,7 @@ sub self_or_default {
 }
 
 sub css {
+	return "" if $TEXT_OUTPUT;
 	my ($self,@p) = self_or_default(@_);
 	$self->_style({
 		code => join($CGI::CRLF,map{ s/^\s+//; s/\s+$//; $_; } @p)