From 1d889728ec7f080714dfc73b28b08acf48fd932e Mon Sep 17 00:00:00 2001 From: Xavier Delaruelle Date: Mon, 8 Jan 2024 06:35:26 +0100 Subject: [PATCH] Fix is-loading argument passing --- tcl/subcmd.tcl.in | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tcl/subcmd.tcl.in b/tcl/subcmd.tcl.in index d24761b6..8b34e0d3 100644 --- a/tcl/subcmd.tcl.in +++ b/tcl/subcmd.tcl.in @@ -1275,7 +1275,7 @@ proc cmdModuleLoad {context uasked tryload loadany tag_list args} { if {$doescon} { set is_con_mod_conun [isModuleEvaluated conun $modnamevr\ {*}$modconlist] - set is_con_mod_loading [is-loading $modconlist] + set is_con_mod_loading [is-loading {*}$modconlist] if {!$is_con_mod_conun || $is_con_mod_loading} { set is_con_mod_eval [isModuleEvaluated any $modnamevr\ {*}$modconlist]