summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Build/source/texk/web2c/uptexdir/ChangeLog4
-rw-r--r--Build/source/texk/web2c/uptexdir/updvitype.ch19
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