From c71093f47f525b6f96e46fbeb5f05c6e7d4793ec Mon Sep 17 00:00:00 2001
From: Andrew Johnson <anj@aps.anl.gov>
Date: Tue, 26 Apr 2011 15:18:30 -0500
Subject: [PATCH] libCom/iocsh: Oops, allow NULL pathname.

---
 src/libCom/iocsh/iocsh.cpp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/libCom/iocsh/iocsh.cpp b/src/libCom/iocsh/iocsh.cpp
index f2d42b973..a3cbd22a1 100644
--- a/src/libCom/iocsh/iocsh.cpp
+++ b/src/libCom/iocsh/iocsh.cpp
@@ -798,7 +798,8 @@ iocshBody (const char *pathname, const char *commandLine)
 int epicsShareAPI
 iocsh (const char *pathname)
 {
-    epicsEnvSet("IOCSH_STARTUP_SCRIPT", pathname);
+    if (pathname)
+        epicsEnvSet("IOCSH_STARTUP_SCRIPT", pathname);
     return iocshBody(pathname, NULL);
 }