soucis avec irix

[lesny]

bonjour voilà j'ai une copie de IriX en tcl mais le souscis que je rencontre et que quand je souhaite enregistré un channel avec mon pseudo qui est donc lesny j'ai cette erreur la

[20:19] -IriX- le mask est trop imprécis , recommencé avec plus d'information , minimum 10 caractères.

j'ai voulu modifier cette ligne la

TCL

if {[string length $param] < 10} {

et mettre

TCL

if {[string length $param] < 4} {

j'ai rehash et restart mais ça ne fonctionne pas je vous joint le tcl

[djkenny]

salut,

si je me souviens bien c est la commande adminreg?
si oui tu n'as pas modifié la bonne ligne:

TCL

...
     if {[join $action] == "adminreg"} {
 
           if {[join $arg1] == "" || [join $arg2] == "" || [join $arg3] == "" || [join $arg4] == ""} {
               do NOTICE [join $nick] "Syntaxe: ADMINREG <#salon> <Login> <Host/mask> <mot-de-passe>"
               return
           }
           if {[accord_csa "adminreg" [join $arg1] [join $nick]] == 1} {
 
           if {[verify [join $arg1]] == 1} {
               do NOTICE [join $nick] "Ce salon est déja enregistrer."
               return
           }
           if {![string match *!*@* $arg3]} {
               do NOTICE [join $nick] "Erreur dans le mask il doit être de la forme Pseudo!Ident@Host"
               do NOTICE [join $nick] "Exemples Oracle*!*@* , Oracle*!*foo*@.fr , Oracle!foo@*.fr"
               return
           }
           if {[string length $arg3] < 10} {
               do NOTICE [join $nick] "le mask est trop imprécis , recommencé avec plus d'information , minimum 10 caratères."
               return
            }
            if {[string length $arg4] < 6} {
               do NOTICE [join $nick] "Le mot de passe doit contenir 5 caractère minimum."
               return
            }
...

[lesny]

heu c'est bien dans cette parti la que j'ai modifier le code que j'ai donner plus haut dj-kenny et ça n'a pas fonctionner

[djkenny]

toi t as ca

TCL

if {[string length $param] < 10} {

moi je vois ca

TCL

if {[string length $arg3] < 10} {

pour moi t as modifié la partie de code du addmask

TCL

if {[string tolower $option] == "addmask"} {
               if {![string match *!*@* $param]} {
                 do NOTICE [join $nick] "Erreur dans le mask il doit être de la forme Pseudo!Ident@Host"
                 do NOTICE [join $nick] "Exemples Oracle*!*@* , Oracle*!*foo*@.fr , Oracle!foo@*.fr"
                 return
               }
               if {[string length $param] < 10} {
                 do NOTICE [join $nick] "Votre mask est trop imprécis , recommencé avec plus d'information , minimum 10 caratères."
                 return
               }

[lesny]

ha merci djkenny tu as raison c'est bien moi qui avais mal vue merci beaucoup par contre quand je restart le bot j'ai cette erreur là

TCL

Erreur tcl [event_cs]: can't read "cs(idx)": no such variable

[djkenny]

il me semble qu il faut dabord die irix avant de restart l eggdrop