Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-04 22:19:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

55_InfoPanel: use BACK as special link to return to referer (#35422)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@8281 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen 2015-03-24 12:41:28 +00:00
parent 19b21a3b45
commit fe4e9cb91c
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
FHEM/55_InfoPanel.pm
View File

@ -48,9 +48,13 @@
# 2015-02-25 - 8095 - changed: iframe handling for secret div # 2015-02-25 - 8095 - changed: iframe handling for secret div
# 2015-03-07 - 8168 - fixed: handling for bg img (Bugzilla #8) # 2015-03-07 - 8168 - fixed: handling for bg img (Bugzilla #8)
# 2015-03-22 - - added: attribute showTime # 2015-03-22 - - added: attribute showTime
# 2015-03-24 - - added: BACK as special link to return
# to $FW_httpheader{Referer}
# changed: limit refresh to at least 60 secs
# to prevent performance issues
# #
############################################## ##############################################
# $Id: 55_InfoPanel.pm 8095 2015-02-25 10:33:21Z betateilchen $ # $Id$
package main; package main;
use strict; use strict;
@ -769,6 +773,7 @@ sub btIP_findTarget {
my $target = 'secret'; my $target = 'secret';
$target = '_top' if $link =~ s/^-//; $target = '_top' if $link =~ s/^-//;
$target = '_blank' if $link =~ s/^\+//; $target = '_blank' if $link =~ s/^\+//;
$link = $FW_httpheader{Referer} if $link eq 'BACK';
return ($link,$target); return ($link,$target);
} }
@ -792,7 +797,6 @@ sub btIP_xy {
sub btIP_returnSVG { sub btIP_returnSVG {
my ($name)= @_; my ($name)= @_;
# #
# increase counter # increase counter
# #
@ -1362,6 +1366,7 @@ sub btIP_returnHTML {
my ($name) = @_; my ($name) = @_;
my $refresh = AttrVal($name, 'refresh', 60); my $refresh = AttrVal($name, 'refresh', 60);
$refresh = ($refresh && $refresh < 59) ? 60 : $refresh;
my $title = AttrVal($name, 'title', $name); my $title = AttrVal($name, 'title', $name);
my $gen = 'generated="'.(time()-1).'"'; my $gen = 'generated="'.(time()-1).'"';
my $code = btIP_HTMLHead($name,$title,$refresh); my $code = btIP_HTMLHead($name,$title,$refresh);