[Demande] aide pour une modification pour whois

[loulou7593]

Voila j'ai regardé un peu et j'ai apporté une modif car ca envoyais bien la proc d'invitation mais avec ce format

Code :

Invite envoyée pour \{RadioBot\ Ptitebulle\ LaBulle\ blueirc-36 D8999.abo.wanadoo.fr\ *\ \}\ LaBulle

donc ca n'envoyais pas à la personne.

Voici le tcl.

tclcopier

# Canal où on doit inviter
    set back "#chan"
     
    # Utilisation d'un bind cron pour faire le /whois
    # toutes les 5 minutes
    bind cron - "*/5 * * * *" whoisAll
    proc whoisAll { mm hh dd mo xx } {
            foreach cuser [userlist] {
               if {![onchan $cuser $::back] } {
                  putserv "WHOIS $cuser"
               }
            }
    }
     
    # Utilisation du raw 311
    bind raw - 311 whoisInvite
    proc whoisInvite {from keyword text} {
	        set nickname [lindex [split $text] 1]
            if {![onchan $nickname $::back] } {
                    putserv "INVITE $nickname $::back"
            }
    }

Et Merci à CrazyCat pour son aide.