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

xinit.c: test for tcl_interactive existence before testing value

This commit is contained in:
stefan schippers 2024-05-02 17:33:43 +02:00
parent c7bf1300c1
commit c544c5bd6e
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

@ -3004,7 +3004,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}] && $tcl_interactive} " tcleval( "if {![catch {package require tclreadline}] && [info exists tcl_interactive] && $tcl_interactive} "
"{" "{"
"::tclreadline::readline builtincompleter 0; " "::tclreadline::readline builtincompleter 0; "
"::tclreadline::readline customcompleter completer; " "::tclreadline::readline customcompleter completer; "