diff options
author | ribet | 2007-10-18 15:49:26 +0000 |
---|---|---|
committer | ribet | 2007-10-18 15:49:26 +0000 |
commit | 42923b2543aa1681c7bddf4842588e881ce76103 (patch) | |
tree | dbfaeb157f013c98d1aed3fb3878b7057842ca8f /src/SVG/SVG2zinc/Conversions.pm | |
parent | a2f8239874832c27eea5ad0be47a3ee7c983e8ba (diff) | |
download | mtc-42923b2543aa1681c7bddf4842588e881ce76103.zip mtc-42923b2543aa1681c7bddf4842588e881ce76103.tar.gz mtc-42923b2543aa1681c7bddf4842588e881ce76103.tar.bz2 mtc-42923b2543aa1681c7bddf4842588e881ce76103.tar.xz |
Fix I'm not really proud of, but it works... (fontMetrics values are wrong)
Diffstat (limited to 'src/SVG/SVG2zinc/Conversions.pm')
-rw-r--r-- | src/SVG/SVG2zinc/Conversions.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/SVG/SVG2zinc/Conversions.pm b/src/SVG/SVG2zinc/Conversions.pm index ad3abeb..0c8fd43 100644 --- a/src/SVG/SVG2zinc/Conversions.pm +++ b/src/SVG/SVG2zinc/Conversions.pm @@ -116,10 +116,10 @@ sub createNamedFont { my ($fontName, $fontKey); if ($family =~ /^-[^-]*-([^-]*)-([^-]*)-[^-]*-[^-]*-[^-]*-([^-]*)-[^-]*-[^-]*-[^-]*-[^-]*-[^-]*-[^-]*-[^-]*$/ ) { $weight = $2; - $size = $3; + $size = 0; # Warning: setting size changes font metrics! $fontKey = "XLFD$family"; $fontName = $family; - $family = $1; + #$family = $1; # Setting the real family prevent from loading the right font } else { $weight = "normal" unless $weight; if ( $size =~ /(.*)pt/ ) |