From 51aafd3ddd85fbd10fb2e4e73d68390b1bea98db Mon Sep 17 00:00:00 2001 From: betateilchen Date: Sat, 7 Feb 2015 18:29:59 +0000 Subject: [PATCH] 55_InfoPanel.pm: updated added: target evaluation for textbox git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@7910 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/55_InfoPanel.pm | 15 ++++++++------- 1 file changed, 8 insertions(+), 7 deletions(-) diff --git a/fhem/FHEM/55_InfoPanel.pm b/fhem/FHEM/55_InfoPanel.pm index 0fad021c2..8db79e13b 100644 --- a/fhem/FHEM/55_InfoPanel.pm +++ b/fhem/FHEM/55_InfoPanel.pm @@ -5,7 +5,7 @@ # forked from 02_RSS.pm by Dr. Boris Neubert # ############################################## -# $Id$ +# $Id: $ package main; use strict; @@ -451,6 +451,11 @@ sub btIP_itemTextBox { $id = ($id eq '-') ? createUniqueId() : $id; my $color = substr($params{rgb},0,6); $link =~ s/"//g; + + my $target = 'secret'; + $target = '_top' if $link =~ s/^-//; + $target = '_blank' if $link =~ s/^\+//; + my ($d,$output); if(defined($params{boxcolor})) { @@ -469,7 +474,7 @@ sub btIP_itemTextBox { $d = "
\n". "\n"; - $d .= "\n" if($link && length($link)); + $d .= "\n" if($link && length($link)); $d .= "

InfoPanel

-