X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/mLib/blobdiff_plain/00c7638bc6791b810069381b8aaebfeac67cdfee..1c66031eaa646ea09f79e6af0db473b571e47363:/quis.c

diff --git a/quis.c b/quis.c
index 34b0f1f..ca14d16 100644
--- a/quis.c
+++ b/quis.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: quis.c,v 1.1 1998/06/17 23:44:42 mdw Exp $
+ * $Id: quis.c,v 1.2 1999/02/28 15:16:29 mdw Exp $
  *
  * Setting the program name
  *
@@ -29,8 +29,12 @@
 /*----- Revision history --------------------------------------------------*
  *
  * $Log: quis.c,v $
- * Revision 1.1  1998/06/17 23:44:42  mdw
- * Initial revision
+ * Revision 1.2  1999/02/28 15:16:29  mdw
+ * quis: remove the leading `-' from the name, in case we're invoked as a
+ * login shell.
+ *
+ * Revision 1.1.1.1  1998/06/17 23:44:42  mdw
+ * Initial version of mLib
  *
  */
 
@@ -86,6 +90,8 @@ void ego(const char *p)
     if (*q++ == PATHSEP)
       p = q;
   }
+  if (*p == '-')
+    p++;
   pn__name = p;
 }