ts: adapt illegal ops on dir msg for Tcl 9.0

envmodules · Jan 13, 2024 · 8e3a7b4 · 8e3a7b4
1 parent f484f8f
commit 8e3a7b4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/testsuite/modules.00-init/005-init_ts.exp b/testsuite/modules.00-init/005-init_ts.exp
@@ -353,7 +353,7 @@ set savelist_long_headerre "- Collection $modlin.- Last mod. $modlin"
 set err_path "$error_msgs: Unable to locate a modulefile for "
 set err_file "$error_msgs: No such file or directory on "
 set warn_file "$warn_msgs: No such file or directory on "
-set err_illdir "$error_msgs: Illegal operation on a directory on "
+set err_illdir "$error_msgs: [expr {[cmpversion $tclsh_version 9.0] > -1 ? {Is} : {Illegal operation on}}] a directory on "
 set err_notadir "$error_msgs: Not a directory on "
 set err_nomodpath "$error_msgs: $msg_nomodpath"
 set err_magicns "$moderr_msgs: Magic cookie '#%Module' missing\nIn "