Un soucis avec TCL

[aliasangelius]

Bonjour,

Voici ce que j'obtien moi :

[17:32:25] ( alias_angelius ) .binds join
[17:32:25] <Xbot02> [16:32:32] #alias_angelius# binds join
[17:32:26] <Xbot02> Liaisons de commande:
[17:32:26] <Xbot02> TYPE FLAGS COMMAND HITS BINDING (TCL)
[17:32:26] <Xbot02> join -|- * 0 join:welcome

ensuite je fait un part/join sur le salon ou j'ai pris soin de mettre dans le code qui à été mis j'ai juste remplace #test part #Services

et voici le résultat :

[quote]
[17:32:46] ( Part ) * alias_angelius * (00Hadmin@430935128.9tel.net) de #services
[17:32:46] ( Join ) * alias_angelius * (00Hadmin@430935128.9tel.net) sur #services
[17:32:46] ( Information ) Mode +sntO
[17:32:46]
[17:32:47] ( Privé ) * Xbot02 * (user-FR@7596679435.talk-me.fr)

[17:32:47] ( Xbot02 ) Bienvenue à vous sur #Services !
[quote]

en ayant le tcl :

tclcopier

bind join - "*" join:welcome
proc join:welcome { nick uhost hand chan } {
  if [string equal -nocase $chan "#Services"] {
      putserv "PRIVMSG $nick :Bienvenue à vous sur $chan !"
  }
}

Donc question :

as-tu mis le tcl dans le dossier scripts ?
as-tu mis dans ta conf de l'eggdrop la ligne : source scripts/letcl.tcl
as-tu rehash l'eggdrop ?