diff options
| author | Norbert Preining <preining@logic.at> | 2017-08-15 06:31:13 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2017-08-15 06:31:13 +0000 |
| commit | ca2b0093893ee418e30136f6ea68a38b6df363a7 (patch) | |
| tree | cdc012b38e2fe37ddfe1c3106428c6d4f9de66ad | |
| parent | bbbac5fc4180dd773310f2876954d340fcfe0f60 (diff) | |
tlshell: use command line option --machine-readable
git-svn-id: svn://tug.org/texlive/trunk@45047 c570f23f-e606-0410-a88d-b1316a301751
| -rwxr-xr-x | Master/texmf-dist/scripts/tlshell/tlshell.tcl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/Master/texmf-dist/scripts/tlshell/tlshell.tcl b/Master/texmf-dist/scripts/tlshell/tlshell.tcl index 1271e15d074..c3727718a90 100755 --- a/Master/texmf-dist/scripts/tlshell/tlshell.tcl +++ b/Master/texmf-dist/scripts/tlshell/tlshell.tcl @@ -199,12 +199,11 @@ proc run_cmd {cmd} { proc start_tlmgr {} { # start the TeX Live Manager shell interface # capture stdout into the pipe, stderr into a temp file - set ::tlshl [open "|tlmgr shell 2>>$::err_file" w+] + set ::tlshl [open "|tlmgr --machine-readable shell 2>>$::err_file" w+] set ::err [open $::err_file r] chan configure $::tlshl -buffering line -blocking 0 chan event $::tlshl readable read_line set ::pipe_cb empty_cb - run_cmd "set machine-readable 1" } proc restart_tlmgr {} { |