--- ptex-src-3.1.8/Makefile.in.orig	2004-12-03 17:33:13.000000000 +0900
+++ ptex-src-3.1.8/Makefile.in	2004-12-16 15:54:25.407886051 +0900
@@ -6,8 +6,8 @@
 default: programs formats
 
 programs=ptex tftopl pltotf pdvitype jbibtex
-euc-formats=ptex-euc.fmt platex-euc.fmt
-sjis-formats=ptex-sjis.fmt platex-sjis.fmt
+euc-formats=ptex-euc.fmt platex-euc.fmt platex209-euc.fmt
+sjis-formats=ptex-sjis.fmt platex-sjis.fmt platex209-sjis.fmt
 
 ac_include ../../make/paths.mk
 
@@ -186,6 +186,14 @@
 	$(dumpenv) $(MAKE) progname=platex files="platex.ltx" prereq-check
 	$(dumpenv) ./ptex --ini --kanji=sjis --progname=platex --jobname=platex-sjis \\input platex.ltx </dev/null
 
+platex209-euc.fmt: ptex texmf.cnf
+	$(dumpenv) $(MAKE) progname=platex files="plplain.ini" prereq-check
+	$(dumpenv) ./ptex --ini --kanji=euc --progname=platex --jobname=platex209-euc \\input platex.ltx </dev/null
+
+platex209-sjis.fmt: ptex texmf.cnf
+	$(dumpenv) $(MAKE) progname=platex files="plplain.ini" prereq-check
+	$(dumpenv) ./ptex --ini --kanji=sjis --progname=platex --jobname=platex209-sjis \\input platex.ltx </dev/null
+
 # This is meant to be called recursively, with $(files) set.
 prereq-check: $(kpathsea_dir)/kpsewhich
 	$(dumpenv) $(kpathsea_dir)/kpsewhich --progname=$(progname) $(files) >/dev/null || $(MAKE) prereq-lose >/dev/null
@@ -222,17 +230,19 @@
 
 # The links to ptex for each format.
 install-links: install-programs $(bindir)
-	cd $(bindir) && (rm -f iniptex virptex platex; $(LN) ptex platex)
+	cd $(bindir) && (rm -f iniptex virptex platex platex209; $(LN) ptex platex ; $(LN) ptex platex209)
 
 # Always do plain.*, so examples from the TeXbook (etc.) will work.
 install-formats: $(formats) $(web2cdir)
 	for f in $(formats); do $(INSTALL_DATA) $$f $(web2cdir)/$$f; done
-	cd $(web2cdir) && (rm -f ptex-jis.fmt platex-jis.fmt ;\
+	cd $(web2cdir) && (rm -f ptex-jis.fmt platex-jis.fmt platex209-jis.fmt ;\
 		$(LN) ptex-euc.fmt ptex-jis.fmt ;\
-		$(LN) platex-euc.fmt platex-jis.fmt)
-	cd $(web2cdir) && (rm -f ptex.fmt platex.fmt ;\
+		$(LN) platex-euc.fmt platex-jis.fmt ;\
+		$(LN) platex209-euc.fmt platex209-jis.fmt)
+	cd $(web2cdir) && (rm -f ptex.fmt platex.fmt platex209.fmt ;\
 		$(LN) ptex-$(configkcode).fmt ptex.fmt ;\
-		$(LN) platex-$(configkcode).fmt platex.fmt )
+		$(LN) platex-$(configkcode).fmt platex.fmt ;\
+		$(LN) platex209-$(configkcode).fmt platex209.fmt)
 
 # Auxiliary files.
 install-data::
@@ -321,6 +331,7 @@
 	rm -fr failure
 	rm -f ptex.web ptex.ch ptex.p ptex.pool ptex.log ptex-euc.fmt ptex-sjis.fmt
 	rm -f platex.log platex-euc.fmt platex-sjis.fmt texsys.aux platex
+	rm -f platex209.log platex209-euc.fmt platex209-sjis.fmt platex209
 	rm -f tftopl.web tftopl.p
 	rm -f pltotf.web pltotf.p
 	rm -f pdvitype.web pdvitype.p