From 00bb3d1e678090bdc85fb78f5980b6e05ae22614 Mon Sep 17 00:00:00 2001
From: Keenan Lang <klang@fozzi.aps.anl.gov>
Date: Fri, 22 Aug 2014 14:25:41 -0500
Subject: [PATCH] iocshLoad now works as iocsh with no parameters

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

diff --git a/src/libCom/iocsh/iocsh.cpp b/src/libCom/iocsh/iocsh.cpp
index 3d0941af3..3a9d459cc 100644
--- a/src/libCom/iocsh/iocsh.cpp
+++ b/src/libCom/iocsh/iocsh.cpp
@@ -849,6 +849,8 @@ iocshCmd (const char *cmd)
 int epicsShareAPI
 iocshLoad(const char *pathname, const char *macros)
 {
+    if (pathname)
+        epicsEnvSet("IOCSH_STARTUP_SCRIPT", pathname);
     return iocshBody(pathname, NULL, macros);
 }