SVG tweaks

git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@649 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2010-07-06 11:29:20 +00:00
parent 109f75e45a
commit 604bbe74ec
5 changed files with 46 additions and 23 deletions

View File

@@ -67,10 +67,17 @@ SVG_render($$$$$$)
}
pO "]]></style>";
if(open(FH, "$__dir/svg_defs.svg")) { # gradient definitions
pO join("", <FH>);
close(FH);
} else {
Log 0, "Can't open $__dir/svg_defs.svg"
}
# Background
pO "<rect width =\"$ow\" height=\"$oh\" class=\"background\"/>";
# Rectangle
pO "<rect x=\"$x\" y=\"$y\" width =\"$w\" height =\"$h\" ".
pO "<rect x=\"$x\" y=\"$y\" width =\"$w\" height =\"$h\" rx=\"8\" ry=\"8\" ".
"fill=\"none\" class=\"border\"/>";
my ($off1,$off2) = ($ow/2, 3*$y/4);