basename() for util/*.c

Update dlb_main to use the revised vms_basename() for #if VMS in
case it issues a usage message.

Change recover to use similar setup, but the vms-specific bit is
commented out because I'm not sure whether the necessary routine
is being linked with it.
This commit is contained in:
PatR
2023-06-23 12:10:38 -07:00
parent 0616a83ef8
commit ef534e053d
2 changed files with 19 additions and 10 deletions
+5 -3
View File
@@ -1,4 +1,4 @@
/* NetHack 3.7 dlb_main.c $NHDT-Date: 1629969943 2021/08/26 09:25:43 $ $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.18 $ */
/* NetHack 3.7 dlb_main.c $NHDT-Date: 1687547434 2023/06/23 19:10:34 $ $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.24 $ */
/* Copyright (c) Kenneth Lorber, Bethesda, Maryland, 1993. */
/* NetHack may be freely redistributed. See license for details. */
@@ -168,10 +168,12 @@ main(int argc UNUSED_if_no_DLB, char **argv UNUSED_if_no_DLB)
char action = ' ';
library lib;
if (argc > 0 && argv[0] && *argv[0])
if (argc > 0)
progname = argv[0];
if (!progname || !*progname)
progname = default_progname;
#ifdef VMS
progname = vms_basename(progname);
progname = vms_basename(progname, FALSE);
#endif
if (argc < 2) {