update runscript_dll.c and runscript.dll

git-svn-id: svn://tug.org/texlive/trunk@70364 c570f23f-e606-0410-a88d-b1316a301751

2 files changed, 9 insertions, 1 deletions

diff --git a/Build/source/texk/texlive/windows_wrapper/runscript.dll b/Build/source/texk/texlive/windows_wrapper/runscript.dll
index d9ae8d7ee36..c8536f6b47d 100755
--- a/Build/source/texk/texlive/windows_wrapper/runscript.dll
+++ b/Build/source/texk/texlive/windows_wrapper/runscript.dll
diff --git a/Build/source/texk/texlive/windows_wrapper/runscript_dll.c b/Build/source/texk/texlive/windows_wrapper/runscript_dll.c
index da658c10e5c..c974cbbdc6b 100644
--- a/Build/source/texk/texlive/windows_wrapper/runscript_dll.c
+++ b/Build/source/texk/texlive/windows_wrapper/runscript_dll.c
@@ -39,7 +39,15 @@ __declspec(dllexport) int dllrunscript( int argc, char *argv[] )
   char *fp;
 
   if (argc) {
-    k = SearchPath(NULL, argv[0], ".exe", 260, infile, &fp);
+    char *pp;
+    char ppp[260];
+    strcpy(ppp, argv[0]);
+    pp = strrchr(ppp, '.');
+    if (!pp || stricmp(pp, ".exe")) {
+      strcat(ppp, ".exe");
+    }
+    argv[0] = ppp;
+    k = SearchPath(NULL, argv[0], NULL, 260, infile, &fp);
     if (!k)
       DIE("cannot find %s\n", argv[0]);
     k = GetLongPathNameA(infile, buff, 260);