diff options
author | wlemb <wlemb> | 2003-12-05 10:26:45 +0000 |
---|---|---|
committer | wlemb <wlemb> | 2003-12-05 10:26:45 +0000 |
commit | 0c132242916f13129299fe6739b1be939a85d456 (patch) | |
tree | 322e449ff7ebe0011d1f377925c0cc9b07956e02 /src/utils/afmtodit | |
parent | 54a212aaf7523aa6c4fbc143d49d1f5f2e8b4c54 (diff) | |
download | groff-0c132242916f13129299fe6739b1be939a85d456.tar.gz |
* LICENSE: New file.
Diffstat (limited to 'src/utils/afmtodit')
-rw-r--r-- | src/utils/afmtodit/afmtodit.pl | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/utils/afmtodit/afmtodit.pl b/src/utils/afmtodit/afmtodit.pl index c8346791..0a4d7070 100644 --- a/src/utils/afmtodit/afmtodit.pl +++ b/src/utils/afmtodit/afmtodit.pl @@ -6102,7 +6102,7 @@ while (<AFM>) { $c = -1; $wx = 0; $n = ""; - %ligs = (); +# %ligs = (); $lly = 0; $ury = 0; $llx = 0; @@ -6125,10 +6125,10 @@ while (<AFM>) { $ury = $field[$i + 4]; $i += 5; } - elsif ($field[$i] eq "L") { - $ligs{$field[$i + 2]} = $field[$i + 1]; - $i += 3; - } +# elsif ($field[$i] eq "L") { +# $ligs{$field[$i + 2]} = $field[$i + 1]; +# $i += 3; +# } else { while ($i <= $#field && $field[$i] ne ";") { $i++; @@ -6145,9 +6145,9 @@ while (<AFM>) { $depth{$n} = -$lly; $left_side_bearing{$n} = -$llx; $right_side_bearing{$n} = $urx - $w; - while (($lig, $glyph2) = each %ligs) { - $ligatures{$lig} = $n . " " . $glyph2; - } +# while (($lig, $glyph2) = each %ligs) { +# $ligatures{$lig} = $n . " " . $glyph2; +# } } } } |