2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-21 14:04:15 +00:00

Plotfork fixes

git-svn-id: https://svn.fhem.de/fhem/trunk@3132 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2013-04-29 15:33:42 +00:00
parent 3944f351d5
commit c76edcf917

View File

@ -70,6 +70,7 @@ weblink_Set($@)
$a[1] = $hash->{NAME}; $a[1] = $hash->{NAME};
my $dstName = "$FW_gplotdir/$a[1].gplot"; my $dstName = "$FW_gplotdir/$a[1].gplot";
$hash->{LINK} = join(":", @a); $hash->{LINK} = join(":", @a);
return "this is already a unique gplot file" if($srcName eq $dstName);
$hash->{DEF} = "$hash->{WLTYPE} $hash->{LINK}"; $hash->{DEF} = "$hash->{WLTYPE} $hash->{LINK}";
open(SFH, $srcName) || return "Can't open $srcName: $!"; open(SFH, $srcName) || return "Can't open $srcName: $!";
open(DFH, ">$dstName") || return "Can't open $dstName: $!"; open(DFH, ">$dstName") || return "Can't open $dstName: $!";
@ -262,7 +263,6 @@ wl_PEdit($$$$)
my $file = $defs{$a[0]}{currentlogfile}; my $file = $defs{$a[0]}{currentlogfile};
my ($err, $cfg, $plot, $flog) = FW_readgplotfile($d, $gp, $file); my ($err, $cfg, $plot, $flog) = FW_readgplotfile($d, $gp, $file);
($cfg, $plot) = FW_substcfg(1, $d, $cfg, $plot, $file, "<OuT>");
my %conf = SVG_digestConf($cfg, $plot); my %conf = SVG_digestConf($cfg, $plot);
my $ret .= "<br><form autocomplete=\"off\" action=\"$FW_ME/weblinkDetails\">"; my $ret .= "<br><form autocomplete=\"off\" action=\"$FW_ME/weblinkDetails\">";