From c85bfc7acd4cddca1d1cff45d9f1e1c2925845e1 Mon Sep 17 00:00:00 2001 From: Takashi Sawanaka Date: Sat, 22 Apr 2023 13:09:03 +0900 Subject: [PATCH] Fix the problem that the plug-in setting window cannot be opened on 32-bit OS --- Plugins/dlls/ApplyPatch.sct | 2 +- Plugins/dlls/CompareMSExcelFiles.sct | 2 +- Plugins/dlls/CompareMSPowerPointFiles.sct | 2 +- Plugins/dlls/CompareMSVisioFiles.sct | 2 +- Plugins/dlls/CompareMSWordFiles.sct | 2 +- Plugins/dlls/PrediffLineFilter.sct | 2 +- 6 files changed, 6 insertions(+), 6 deletions(-) diff --git a/Plugins/dlls/ApplyPatch.sct b/Plugins/dlls/ApplyPatch.sct index f2a73de75..b2a53f525 100644 --- a/Plugins/dlls/ApplyPatch.sct +++ b/Plugins/dlls/ApplyPatch.sct @@ -253,7 +253,7 @@ Function ShowSettingsDialog() tfile.Write Translate(getResource("dialog1")) tfile.Close exportSettingsToJSONFile jsonfile - mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe") + mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe") If Not fso.FileExists(mshta) Then mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe") End If diff --git a/Plugins/dlls/CompareMSExcelFiles.sct b/Plugins/dlls/CompareMSExcelFiles.sct index 3ba6ca081..9b28a3537 100644 --- a/Plugins/dlls/CompareMSExcelFiles.sct +++ b/Plugins/dlls/CompareMSExcelFiles.sct @@ -660,7 +660,7 @@ Function ShowSettingsDialog() tfile.Write Translate(getResource("dialog1")) tfile.Close exportSettingsToJSONFile jsonfile - mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe") + mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe") If Not fso.FileExists(mshta) Then mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe") End If diff --git a/Plugins/dlls/CompareMSPowerPointFiles.sct b/Plugins/dlls/CompareMSPowerPointFiles.sct index f282b105c..70dafb0f6 100644 --- a/Plugins/dlls/CompareMSPowerPointFiles.sct +++ b/Plugins/dlls/CompareMSPowerPointFiles.sct @@ -346,7 +346,7 @@ Function ShowSettingsDialog() tfile.Write Translate(getResource("dialog1")) tfile.Close exportSettingsToJSONFile jsonfile - mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe") + mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe") If Not fso.FileExists(mshta) Then mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe") End If diff --git a/Plugins/dlls/CompareMSVisioFiles.sct b/Plugins/dlls/CompareMSVisioFiles.sct index 83bc1a399..79ab2a970 100644 --- a/Plugins/dlls/CompareMSVisioFiles.sct +++ b/Plugins/dlls/CompareMSVisioFiles.sct @@ -304,7 +304,7 @@ Function ShowSettingsDialog() tfile.Write Translate(getResource("dialog1")) tfile.Close exportSettingsToJSONFile jsonfile - mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe") + mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe") If Not fso.FileExists(mshta) Then mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe") End If diff --git a/Plugins/dlls/CompareMSWordFiles.sct b/Plugins/dlls/CompareMSWordFiles.sct index 3603eb885..d6d474bf9 100644 --- a/Plugins/dlls/CompareMSWordFiles.sct +++ b/Plugins/dlls/CompareMSWordFiles.sct @@ -343,7 +343,7 @@ Function ShowSettingsDialog() tfile.Write Translate(getResource("dialog1")) tfile.Close exportSettingsToJSONFile jsonfile - mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe") + mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe") If Not fso.FileExists(mshta) Then mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe") End If diff --git a/Plugins/dlls/PrediffLineFilter.sct b/Plugins/dlls/PrediffLineFilter.sct index 30e46a4de..5ca4e94b4 100644 --- a/Plugins/dlls/PrediffLineFilter.sct +++ b/Plugins/dlls/PrediffLineFilter.sct @@ -167,7 +167,7 @@ Function ShowSettingsDialog() tfile.Write Translate(getResource("dialog1")) tfile.Close exportSettingsToJSONFile jsonfile - mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe") + mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe") If Not fso.FileExists(mshta) Then mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe") End If -- 2.11.0