cd /texlive/Master/texmf-dist/tpm
for i in *.tpm
do
F=`basename $i .tpm`
X=`kpsewhich -format='TeX system documentation' $F.xml`
if test -z "$X"; then
echo PANIC $F
else
xt $F.tpm /texlive/Build/cdbuild/tpm2tpm.xsl $$.xml
p4 edit $F.tpm
cat $$.xml > $F.tpm
rm $$.xml
fi
done