[aide] comment rajouter des hosts et des salons en plus pour sajoin

[CrazyCat]

Il faut un peu adapter le script pour avoir une association vhost => canaux

tclcopier

set vhostsaj {
   "*@StaffAnim.monsite.net" "#canal1,#canal2"
   "*@Anim.monsite.net" "#canal2"
}
 
bind join - "*" mesajoin
proc mesajoin {nick host hand arg} {
   foreach vhost [array names $::vhostsaj] {
      if {[string match -nocase $vhost $host]]} {
         putserv "SAJOIN $nick $::vhostsaj($vhost)"
      }
   }
}

Bon, il y a sûrement un petit souci sur l'utilisation du tableau dans le putserv, ainsi que dans la possibilité de faire sajoin #canal1,#canal2, mais de toutes manières le sajoin, c'est le mal.