27/12/2010, 21:50
J'aurais été surpris que ça fonctionne vu le bind.
Pour ma part, j'aurais fait:
Pour ma part, j'aurais fait:
tcl
foreach c [split $::aphogreet::pub_chans]} {
bind join - "$c *" [namespace current]::changegreet
}