aboutsummaryrefslogtreecommitdiff
path: root/src/SVG/SVG2zinc.pm
diff options
context:
space:
mode:
authorribet2007-09-28 13:14:34 +0000
committerribet2007-09-28 13:14:34 +0000
commit147b3db27350f5bfeb40bc5f5b9a8a5403781a3f (patch)
treecdb081d8a506e8743e83203cdfd03aca2ef80660 /src/SVG/SVG2zinc.pm
parent5bcf044788d820baf098c1e65cc4bd410484c9d7 (diff)
downloadmtc-147b3db27350f5bfeb40bc5f5b9a8a5403781a3f.zip
mtc-147b3db27350f5bfeb40bc5f5b9a8a5403781a3f.tar.gz
mtc-147b3db27350f5bfeb40bc5f5b9a8a5403781a3f.tar.bz2
mtc-147b3db27350f5bfeb40bc5f5b9a8a5403781a3f.tar.xz
Ajout de la gestion des fontes XLFD
Diffstat (limited to 'src/SVG/SVG2zinc.pm')
-rw-r--r--src/SVG/SVG2zinc.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/SVG/SVG2zinc.pm b/src/SVG/SVG2zinc.pm
index 6c33b6f..22d41bb 100644
--- a/src/SVG/SVG2zinc.pm
+++ b/src/SVG/SVG2zinc.pm
@@ -1839,10 +1839,10 @@ sub analyze_text_style_hash
{
## to be extended to all other fonts definition parameters
## NB: fontWeight is not used yet!
- my ($fontKey,$code) = &createNamedFont ($fontFamily, $fontSize, $fontWeight);
+ my ($fontKey,$fontName,$code) = &createNamedFont ($fontFamily, $fontSize, $fontWeight);
&display("\$fonts{\"$fontKey\"} = ") if $code;
&display($code) if $code;
- $res .= ", -font => \"$fontKey\"";
+ $res .= ", -font => \"$fontName\"";
$current_font_key = $fontKey;
}
return $res;