Mercurial > mxe-octave

comparison installer-files/octave.vbs @ 4644:c3950e2b4066

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix vbs scripts to launch with '--gui' option (bug #53369). * octave-firsttime.vbs, octave.vbs: Add 'Chr(34) & "--gui" & Chr(34)' option when calling octave gui executable.
author Rik <rik@octave.org>
date Tue, 27 Mar 2018 09:53:22 -0700
parents b0cb0218813c
children 202fa20cf559
comparison
equal deleted inserted replaced
4643:b0cb0218813c 4644:c3950e2b4066
40 ' and build other args to use 40 ' and build other args to use
41 GUI_MODE=1 41 GUI_MODE=1
42 AllArgs = "" 42 AllArgs = ""
43 Set wshArgs = WScript.Arguments 43 Set wshArgs = WScript.Arguments
44 For I = 0 to wshArgs.Count - 1 44 For I = 0 to wshArgs.Count - 1
45 if wshArgs(I) = "--no-gui" then GUI_MODE=0 45 If wshArgs(I) = "--no-gui" Then GUI_MODE=0
46 AllArgs = AllArgs & " " & chr(34) & wshArgs(I) & chr(34) 46 AllArgs = AllArgs & " " & chr(34) & wshArgs(I) & chr(34)
47 Next 47 Next
48 48
49 ' start octave-gui, either with console shown or hidden 49 ' start octave-gui, either with console shown or hidden
50 If GUI_MODE = 1 then 50 If GUI_MODE = 1 then
51 wshShell.Run chr(34) & OctavePath & "\bin\octave-gui.exe --gui" & Chr(34) & AllArgs, 0 51 AllArgs = AllArgs & " " & chr(34) & "--gui" & chr(34)
52 wshShell.Run chr(34) & OctavePath & "\bin\octave-gui.exe" & Chr(34) & AllArgs, 0
52 Else 53 Else
53 wshShell.Run chr(34) & OctavePath & "\bin\octave-gui.exe" & Chr(34) & AllArgs, 1 54 wshShell.Run chr(34) & OctavePath & "\bin\octave-gui.exe" & Chr(34) & AllArgs, 1
54 End If 55 End If
55 56
56 ' free our objects 57 ' free our objects