[Résolu] problème de timer sur un unban

[Alucard`68]

Bonsoir, j'ai modifier comme conseillé mais cela ne fonctionne pas

tclcopier

proc banraison { nick host hand channel text } {
  global cs chanlog exempt unban
  set args [split $text]
  set victim [lindex $args 0]
  set reason [join [lrange $args 1 end]]
  if { ![onchan $victim $channel] } {
    putserv "PRIVMSG $channel :\0034$victim \00312n'est pas là \0037$nick"
	return 0
  }
  set vichost [getchanhost $victim $channel]
  set protec 0
  foreach vhost $exempt(vhost) {
	if { [string match -nocase $vhost $vichost] } {
	  set protec 1
	}
  }
  if { $protec == 1 } {
    putserv "NOTICE $nick :$exempt(reason)"
    } else {
    putserv "PRIVMSG $cs ban $channel $victim $reason"
    putserv "PRIVMSG $chanlog :\0034$victim \00312a été bannie de \0034$channel \00312par \0034$nick \00312pour la raison :\0037 $reason"
    timer $unban(time) [list putserv "PRIVMSG $cs :unban $channel -b $victim"]
  }
}

plus de message d'erreur a propos du timer par contre a priori il unban eggdrop à la place de l'user.

Code :

[05:31:00] -ChanServ (Service@EnjOy-TchaT.fr)- Vous avez été débanni de #TesT.

Donc ceux qui me laisse pensé que pour le unban il ne prend pas en compte la variable "$victim"
Comment faire ?

EDIT :
Pas étonnant que cela ne fonctionne pas puisque la commande n'est pas bonne...
j'ai donc modifier par

tclcopier

timer $unban(time) [list putserv "mode $channel -b $victim"]

La je n'ai plus aucun message d'erreur en PL par contre sa ne unban toujours pas...
j'ai aussi tenté en remplacent "$victim" par "$host" mais même constat.
Donc comment faire pour que mon unban fonctonne ?
Merci d'avance.

Bye.