blob: 15fd0d5d5c245ca155c7bcc972314e8d8456a6f2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
@echo off
rem Directory of this script; ends with backslash
rem This should also work with UNC names
set tlsubsub=%~dp0
set tlprog=
set tldrive=%~d0
set pathsave=%path%
%tldrive%
cd %tlsubsub%
"%tlsubsub%..\..\tlpkg\tlperl\bin\perl" "%~dpn0.pl" %1 %2 %3 %4 %5 %6 %7 %8 %9
pause Done
rem cleanup in case of start from command-line
path %pathsave%
set pathsave=
set tldrive=
set tlsubsub=
|