lib.c: (set_progname): Set program name even if `argv[0]' has no `/'.

[runlisp] / lib.c

diff --git a/lib.c b/lib.c
index 251d932..eb2a586 100644 (file)
--- a/lib.c
+++ b/lib.c
@@ -51,7 +51,7 @@ void set_progname(const char *prog)
   const char *p;
 
   p = strrchr(prog, '/');
-  progname = p ? p + 1 : progname;
+  progname = p ? p + 1 : prog;
 }
 
 /* Report an error or warning in Unix style, given a captured argument