summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/gftype.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/gftype.ch')
-rw-r--r--Build/source/texk/web2c/gftype.ch2
1 files changed, 1 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/gftype.ch b/Build/source/texk/web2c/gftype.ch
index 3ee9cb763eb..b26f81a1378 100644
--- a/Build/source/texk/web2c/gftype.ch
+++ b/Build/source/texk/web2c/gftype.ch
@@ -51,7 +51,7 @@ procedure initialize; {this procedure gets things started properly}
@!bound_default:integer; {temporary for setup}
@!bound_name:const_cstring; {temporary for setup}
begin
- kpse_set_progname (argv[0]);
+ kpse_set_program_name (argv[0], 'gftype');
kpse_init_prog ('GFTYPE', 0, nil, nil);
parse_arguments;
print(banner);print_ln(version_string);