Mercurial > mxe-octave
view installer-files/octave-firsttime.vbs @ 4545:0e56fe2d2ef5
Makefile.in: add update-build-tools target
* Makefile.in: add update-build-tools target
* src/build-autoconf.mk, src/build-automake.mk,
src/build-bison.mk, src/build-gawk.mk,
src/build-gcc.mk, src/build-gettext.mk,
src/build-gperf.mk, src/build-m4.mk,
src/build-texinfo.mk, src/build-libtool.mk
: update PKG_UPDATE for getting latest version from gnu.org
* src/build-cmake.mk, src/build-flex.mk,
src/build-lzip.mk, src/build-pkg-config.mk,
src/pkg-config.mk, src/build-scons.mk
: add implemented PKG_UPDATE macro
author | John Donoghue <john.donoghue@ieee.org> |
---|---|
date | Thu, 23 Nov 2017 12:05:29 -0500 |
parents | 0fdeee4cfe11 |
children | b0cb0218813c |
line wrap: on
line source
' script to run octave in gui/command mode Set wshShell = CreateObject( "WScript.Shell" ) ' get the directory that script resides in Set fso = CreateObject("Scripting.FileSystemObject") OctavePath = fso.GetParentFolderName(WScript.ScriptFullName) ' get path as a 8.3 path Set fo = fso.GetFolder(OctavePath) OctavePath = fo.ShortPath Set fo = Nothing ' set up path to ensure octave bin comes first Set wshSystemEnv = wshShell.Environment( "PROCESS" ) wshSystemEnv("PATH") = OctavePath & "\bin;" & wshSystemEnv("PATH") ' set terminal type wshSystemEnv("TERM") = "cygwin" wshSystemEnv("GNUTERM") = "wxt" wshSystemEnv("GS") = "gs.exe" If wshShell.ExpandEnvironmentStrings("%HOME%") = "%HOME%" Then Home = wshSystemEnv("USERPROFILE") Set fo = fso.GetFolder(Home) wshSystemEnv("HOME") = fo.ShortPath Set fo = Nothing End If ' set Qt plugin directory and path Set objFSO = CreateObject("Scripting.FileSystemObject") If objFSO.FolderExists(OctavePath & "\qt5\bin") Then wshSystemEnv("PATH") = OctavePath & "\qt5\bin;" & wshSystemEnv("PATH") wshSystemEnv("QT_PLUGIN_PATH") = OctavePath & "\qt5\plugins" Else wshSystemEnv("QT_PLUGIN_PATH") = OctavePath & "\plugins" End If ' set directory to users startpath = wshShell.ExpandEnvironmentStrings("%UserProfile%") wshShell.CurrentDirectory = startpath wshShell.Run chr(34) & OctavePath & "\bin\octave-gui.exe" & Chr(34), 0 ' free our objects Set fso = Nothing Set wshShell = Nothing Set wshSystemEnv = Nothing Set wshArgs = Nothing