blob: ab0d3bbd4b04ab48a1ab6f66291e76ce933dedd9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
Set WshShell = CreateObject("WScript.Shell")
LinkPath = WshShell.CurrentDirectory + "\Midipix mintty shell.lnk"
If WScript.Arguments.Count = 0 Then
MinttyPath = "C:\cygwin64\bin\mintty.exe"
Else
MinttyPath = WScript.Arguments(0)
End If
Set fso = CreateObject("Scripting.FileSystemObject")
If not (fso.FileExists(LinkPath)) Then
Set oMyShortCut = WshShell.CreateShortcut(LinkPath)
oMyShortCut.WindowStyle = 4
oMyShortcut.IconLocation = MinttyPath
oMyShortCut.TargetPath = MinttyPath
oMyShortCut.Arguments = "-i /Cygwin-Terminal.ico -e sh midipix.sh"
oMyShortCut.WorkingDirectory = WshShell.CurrentDirectory
oMyShortCut.Save
End If
|
