X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/d6930356cabd3036e445cc6a2f668b1fd3e0cde4..fdcf46d33eebc59e56a35fcea186c61aad3c81d0:/src/callproc.c

diff --git a/src/callproc.c b/src/callproc.c
index 07297820ca..7008b916da 100644
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -1094,7 +1094,7 @@ add_env (char **env, char **new_env, char *string)
       char *p = *ep, *q = string;
       while (ok)
 	{
-	  if (*q != *p)
+	  if (*p && *q != *p)
 	    break;
 	  if (*q == 0)
 	    /* The string is a lone variable name; keep it for now, we