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

tclcopier

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

et mettre

tclcopier

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:

tclcopier

...
     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

tclcopier

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

moi je vois ca

tclcopier

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

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

tclcopier

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à

tclcopier

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