diff options
Diffstat (limited to 'Build')
-rw-r--r-- | Build/source/texk/web2c/uptexdir/ChangeLog | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/uptexdir/updvitype.ch | 19 |
2 files changed, 22 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/uptexdir/ChangeLog b/Build/source/texk/web2c/uptexdir/ChangeLog index d4dc6381cc7..6dd1bfdfe80 100644 --- a/Build/source/texk/web2c/uptexdir/ChangeLog +++ b/Build/source/texk/web2c/uptexdir/ChangeLog @@ -1,3 +1,7 @@ +2011-09-05 Takuji Tanaka <KXD02663@nifty.ne.jp> + + * updvitype.ch: show encoding in the banner. + 2011-08-29 Peter Breitenlohner <peb@mppmu.mpg.de> * kanji.h, uptex.defines: Remove setptexencuptex. 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 |