#!/bin/sh
#
# Add extra kerning pairs to an AFM file
#

[ $# -lt 2 ] && { echo "usage: addkern afm_file kern_file" >&2; exit 1; }

mf=$(mktemp ~/.addkern.XXXXXX) || exit 1
kf=$(mktemp ~/.addkern.XXXXXX) || exit 1
sed -e '/StartKernData/,$d' "$1" >$mf
sed -e '1,/StartKernPairs/d' -e '/EndKernPairs/,$d' "$1" >$kf
nk=$(cat $kf "$2" | wc -l)
(
cat $mf
echo StartKernData
echo StartKernPairs $nk
cat $kf "$2"
echo "EndKernPairs
EndKernData
EndFontMetrics"
) >"$1"
rm -f $mf $kf
.