summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/ptexdir
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2012-07-16 07:27:23 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2012-07-16 07:27:23 +0000
commit2f6e1cc9e4c3f899a4142cbdf44e6fc10af0d32b (patch)
tree6ca7032c7cce84a2826dc9105b9aaf479800b561 /Build/source/texk/web2c/ptexdir
parent41e050122555719daad3bc3da47e3d559e39c42f (diff)
texk/*: Pass known program names as arg2 to kpse_set_program_name()
git-svn-id: svn://tug.org/texlive/trunk@27073 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/ptexdir')
-rw-r--r--Build/source/texk/web2c/ptexdir/ChangeLog5
-rw-r--r--Build/source/texk/web2c/ptexdir/pbibtex.ch16
-rw-r--r--Build/source/texk/web2c/ptexdir/pdvitype.ch16
-rw-r--r--Build/source/texk/web2c/ptexdir/ppltotf.ch16
-rw-r--r--Build/source/texk/web2c/ptexdir/ptftopl.ch16
5 files changed, 13 insertions, 56 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ChangeLog b/Build/source/texk/web2c/ptexdir/ChangeLog
index dae9ffdb618..4eda595b09e 100644
--- a/Build/source/texk/web2c/ptexdir/ChangeLog
+++ b/Build/source/texk/web2c/ptexdir/ChangeLog
@@ -1,3 +1,8 @@
+2012-07-15 Peter Breitenlohner <peb@mppmu.mpg.de>
+
+ * pbibtex.ch, pdvitype.ch, ppltotf.ch, ptftopl.ch:
+ Adapt to the use my_name.
+
2012-07-15 Akira Kakuto <kakuto@fuk.kindai.ac.jp>
* ptexextra.c: Must #define DLLPROC before reading ptexd.h.
diff --git a/Build/source/texk/web2c/ptexdir/pbibtex.ch b/Build/source/texk/web2c/ptexdir/pbibtex.ch
index 5a6adc4112a..1752e8059d7 100644
--- a/Build/source/texk/web2c/ptexdir/pbibtex.ch
+++ b/Build/source/texk/web2c/ptexdir/pbibtex.ch
@@ -42,8 +42,10 @@
% [1] banner
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@x
+@d my_name=='bibtex'
@d banner=='This is BibTeX, Version 0.99d' {printed when the program starts}
@y
+@d my_name=='pbibtex'
@d banner=='This is pBibTeX, Version 0.99d-j0.33'
{printed when the program starts}
@z
@@ -520,12 +522,6 @@ const n_options = 6; {Pascal won't count array lengths for us.}
@z
@x
- usage ('bibtex');
-@y
- usage ('pbibtex');
-@z
-
-@x
usage_help (BIBTEX_HELP, nil);
@y
usage_help (PBIBTEX_HELP, nil);
@@ -542,14 +538,6 @@ const n_options = 6; {Pascal won't count array lengths for us.}
@z
@x
- write_ln (stderr, 'bibtex: Need exactly one file argument.');
- usage ('bibtex');
-@y
- write_ln (stderr, 'pbibtex: Need exactly one file argument.');
- usage ('pbibtex');
-@z
-
-@x
long_options[current_option].name := 'version';
long_options[current_option].has_arg := 0;
long_options[current_option].flag := 0;
diff --git a/Build/source/texk/web2c/ptexdir/pdvitype.ch b/Build/source/texk/web2c/ptexdir/pdvitype.ch
index 53f0a0ebc6d..d9df210e39a 100644
--- a/Build/source/texk/web2c/ptexdir/pdvitype.ch
+++ b/Build/source/texk/web2c/ptexdir/pdvitype.ch
@@ -3,8 +3,10 @@
% 09/27/95 (KA) Supporting ASCII pTeX
%
@x
+@d my_name=='dvitype'
@d banner=='This is DVItype, Version 3.6' {printed when the program starts}
@y
+@d my_name=='pdvitype'
@d banner=='This is pDVItype, Version 3.6-p0.4'
{printed when the program starts}
@z
@@ -489,12 +491,6 @@ const n_options = 10; {Pascal won't count array lengths for us.}
@z
@x
- usage ('dvitype');
-@y
- usage ('pdvitype');
-@z
-
-@x
usage_help (DVITYPE_HELP, nil);
@y
usage_help (PDVITYPE_HELP, nil);
@@ -513,14 +509,6 @@ const n_options = 10; {Pascal won't count array lengths for us.}
@z
@x
- write_ln (stderr, 'dvitype: Need exactly one file argument.');
- usage ('dvitype');
-@y
- write_ln (stderr, 'pdvitype: Need exactly one file argument.');
- usage ('pdvitype');
-@z
-
-@x
@ An element with all zeros always ends the list.
@y
@ Shift-JIS terminal (the flag is ignored except for WIN32).
diff --git a/Build/source/texk/web2c/ptexdir/ppltotf.ch b/Build/source/texk/web2c/ptexdir/ppltotf.ch
index d7d68421a85..a071bf0f82c 100644
--- a/Build/source/texk/web2c/ptexdir/ppltotf.ch
+++ b/Build/source/texk/web2c/ptexdir/ppltotf.ch
@@ -11,8 +11,10 @@
@z
@x [2] l.69 - pTeX:
+@d my_name=='pltotf'
@d banner=='This is PLtoTF, Version 3.5' {printed when the program starts}
@y
+@d my_name=='ppltotf'
@d banner=='This is pPLtoTF, Version 3.5-p1.8'
{printed when the program starts}
@z
@@ -355,12 +357,6 @@ const n_options = 5; {Pascal won't count array lengths for us.}
@z
@x
- usage ('pltotf');
-@y
- usage ('ppltotf');
-@z
-
-@x
usage_help (PLTOTF_HELP, nil);
@y
usage_help (PPLTOTF_HELP, nil);
@@ -377,14 +373,6 @@ const n_options = 5; {Pascal won't count array lengths for us.}
@z
@x
- write_ln (stderr, 'pltotf: Need one or two file arguments.');
- usage ('pltotf');
-@y
- write_ln (stderr, 'ppltotf: Need one or two file arguments.');
- usage ('ppltotf');
-@z
-
-@x
@ An element with all zeros always ends the list.
@y
@ Shift-JIS terminal (the flag is ignored except for WIN32).
diff --git a/Build/source/texk/web2c/ptexdir/ptftopl.ch b/Build/source/texk/web2c/ptexdir/ptftopl.ch
index 691b87506de..ad7d889b025 100644
--- a/Build/source/texk/web2c/ptexdir/ptftopl.ch
+++ b/Build/source/texk/web2c/ptexdir/ptftopl.ch
@@ -10,8 +10,10 @@
@z
@x [2] l.64 - pTeX:
+@d my_name=='tftopl'
@d banner=='This is TFtoPL, Version 3.2' {printed when the program starts}
@y
+@d my_name=='ptftopl'
@d banner=='This is pTFtoPL, Version 3.2-p1.7'
{printed when the program starts}
@z
@@ -352,12 +354,6 @@ const n_options = 6; {Pascal won't count array lengths for us.}
@z
@x
- usage ('tftopl');
-@y
- usage ('ptftopl');
-@z
-
-@x
usage_help (TFTOPL_HELP, nil);
@y
usage_help (PTFTOPL_HELP, nil);
@@ -374,14 +370,6 @@ const n_options = 6; {Pascal won't count array lengths for us.}
@z
@x
- print_ln ('tftopl: Need one or two file arguments.');
- usage ('tftopl');
-@y
- print_ln ('ptftopl: Need one or two file arguments.');
- usage ('ptftopl');
-@z
-
-@x
@ An element with all zeros always ends the list.
@y
@ Shift-JIS terminal (the flag is ignored except for WIN32).