aboutsummaryrefslogtreecommitdiff
path: root/src/SVG
diff options
context:
space:
mode:
Diffstat (limited to 'src/SVG')
-rw-r--r--src/SVG/SVG2zinc.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/SVG/SVG2zinc.pm b/src/SVG/SVG2zinc.pm
index d1e3235..5b25aa1 100644
--- a/src/SVG/SVG2zinc.pm
+++ b/src/SVG/SVG2zinc.pm
@@ -1844,7 +1844,11 @@ sub analyze_text_style_hash
my ($fontKey,$fontName,$code) = &createNamedFont ($fontFamily, $fontSize, $fontWeight);
&display("\$fonts{\"$fontKey\"} = ") if $code;
&display($code) if $code;
- $res .= ", -font => \"$fontName\"";
+ if ($fontKey =~ /^XLFD-/ ) {
+ $res .= ", -font => \"$fontName\"";
+ } else {
+ $res .= ", -font => \"$fontKey\"";
+ }
$current_font_key = $fontKey;
}
return $res;