From: Nicolas Boisselier Date: Mon, 27 Nov 2023 23:11:43 +0000 (+0100) Subject: textOutput iframe X-Git-Url: https://git.nbdom.net/?a=commitdiff_plain;h=c8115f10592de210c44709cd54b14cc1b97c2898;p=nb.git textOutput iframe --- diff --git a/lib/perl/NB/CGI.pm b/lib/perl/NB/CGI.pm index be9df918..ee872146 100644 --- a/lib/perl/NB/CGI.pm +++ b/lib/perl/NB/CGI.pm @@ -46,7 +46,6 @@ sub textOutput {{ # TH elsif ($tagname eq 'th') { - #@result = map { &str_center($_)."\n" } @result; @result = map {$_ ? "$_\n" : '';} @result; } # TD @@ -55,6 +54,12 @@ sub textOutput {{ #warn $tagname if ($tagname =~ /^(start_)?td$/); @result = map {"|$_";} @result; } + # IFRAME + elsif ($tagname eq 'iframe') + { + @result = map {$_ ? "$_\n" : '';} @result; + @result = ('[ '.$a->{src}.' ]') if ref($a)||'' eq 'HASH'; + } @result = grep {$_ ne ' '} @result; return "@result";