From 1a38bcb3e8464d440f42341d3e67c2691ac44421 Mon Sep 17 00:00:00 2001 From: saal Date: Fri, 1 Jun 2007 15:27:55 +0000 Subject: modification pour prise en compte du font-weight + modification de la methode use pour ecriture différée dans le fichier généré lors du parsing svg --- src/SVG/SVG2zinc.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/SVG/SVG2zinc.pm b/src/SVG/SVG2zinc.pm index f344b96..31e4559 100644 --- a/src/SVG/SVG2zinc.pm +++ b/src/SVG/SVG2zinc.pm @@ -543,7 +543,7 @@ sub use { { push @transforms, "-> translate ($name, $x,$y);"; } - &display ($res,@transforms); + &ddisplay ($res,@transforms); } { ## start of defs block to share $res and other variables between many functions @@ -1837,7 +1837,7 @@ 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, ""); + my ($fontKey,$code) = &createNamedFont ($fontFamily, $fontSize, $fontWeight); &display("\$fonts{\"$fontKey\"} = ") if $code; &display($code) if $code; $res .= ", -font => \"$fontKey\""; -- cgit v1.1