From 46319c0a4c44b4d4811810819fd2d8b57b9809a3 Mon Sep 17 00:00:00 2001 From: Akira Kakuto Date: Mon, 5 Sep 2011 08:06:37 +0000 Subject: Apply patches by Takuji Tanaka. git-svn-id: svn://tug.org/texlive/trunk@23824 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/uptexdir/updvitype.ch | 19 ++++++++++++++++++- 1 file changed, 18 insertions(+), 1 deletion(-) (limited to 'Build/source/texk/web2c/uptexdir/updvitype.ch') diff --git a/Build/source/texk/web2c/uptexdir/updvitype.ch b/Build/source/texk/web2c/uptexdir/updvitype.ch index 47297de8a29..6ceaf51f394 100644 --- a/Build/source/texk/web2c/uptexdir/updvitype.ch +++ b/Build/source/texk/web2c/uptexdir/updvitype.ch @@ -1,7 +1,24 @@ @x @d banner=='This is pDVItype, Version 3.6-p0.4' @y -@d banner=='This is upDVItype, Version 3.6-p0.4-u0.28' +@d banner=='This is upDVItype, Version 3.6-p0.4-u0.30' +@z + +@x procedure initialize + kpse_set_program_name (argv[0], nil); + init_kanji; + parse_arguments; + print (banner); + print_ln (version_string); +@y + kpse_set_program_name (argv[0], nil); + init_kanji; + parse_arguments; + print (banner); + print (' ('); + print (stringcast(getencstring)); + print (')'); + print_ln (version_string); @z @x procedure out_kanji -- cgit v1.2.3