luke
/
xschem
mirror of https://github.com/StefanSchippers/xschem.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

do not use tclreadline if $tcl_interactive is 0

This commit is contained in:
Stefan Schippers 2023-07-02 19:47:04 +02:00
parent 33eb3fecce
commit 9f23965096
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/xinit.c
View File

@ -2828,7 +2828,7 @@ int Tcl_AppInit(Tcl_Interp *inter)
if(tclgetboolvar("use_tclreadline") && !cli_opt_detach && !cli_opt_no_readline) { if(tclgetboolvar("use_tclreadline") && !cli_opt_detach && !cli_opt_no_readline) {
tcleval( "if {![catch {package require tclreadline}]} " tcleval( "if {![catch {package require tclreadline}] && $tcl_interactive} "
"{::tclreadline::readline builtincompleter 0;" "{::tclreadline::readline builtincompleter 0;"
"::tclreadline::readline customcompleter completer;" "::tclreadline::readline customcompleter completer;"
"::tclreadline::Loop }" "::tclreadline::Loop }"