aboutsummaryrefslogtreecommitdiff
path: root/src/SVG/SVG2zinc.pm
diff options
context:
space:
mode:
Diffstat (limited to 'src/SVG/SVG2zinc.pm')
-rw-r--r--src/SVG/SVG2zinc.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/SVG/SVG2zinc.pm b/src/SVG/SVG2zinc.pm
index 75e1429..d1e3235 100644
--- a/src/SVG/SVG2zinc.pm
+++ b/src/SVG/SVG2zinc.pm
@@ -1167,7 +1167,7 @@ my %save_current_context = ();
if ($current_font_key =~ /^XLFD/) {
my $fontname = $current_font_key;
$fontname =~ s/^XLFD//;
- push (@ascent, "\$ascent = int(\`xlsfonts -l -fn '$fontname' |tail -1|cut -c 31-33\`);");
+ push (@ascent, "\$ascent = -> fontMetrics ('$fontname', -ascent);");
} else {
push (@ascent, "\$ascent = -> fontMetrics (\$fonts{\"$current_font_key\"}, -ascent);");
}