[Bug] comment regsub altère l'encodage d'une chaîne de caractères

[MenzAgitat]

 
autre solution toute moche mais fonctionnelle :

tclcopier

proc ::testproc {} {
  set testvar "test n°1"
  set testvar [encoding convertto utf-8 $testvar]
  regsub {test} $testvar "truc" testvar
  set testvar [encoding convertfrom utf-8 $testvar]
  putlog "---> [encoding convertto identity $testvar]"
}

effet en partyline :

Code :

[17:59:18] ---> truc n°1