Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


Soucis de majuscules.
#1
Bonjour,

Voilà j'ai un soucis sur la prise en charges des majuscules lors d'un enregistrement.

Donc je tape la commande /msg Resa register TestPseuDo TestPseuDo unpass
Et sa me dit bien que la commande à était effectué.
Par contre lorsque je désire me connecté pour que sa prenne en charge la réservation de pseudo sa ne fonctionne pas.

J'ai fait des testes sur des pseudos en minuscules et celà fonctionne très bien.
Par contre avec des majuscules cela ne fonctionne pas.

Voici le code.


tcl
if {$destinataire=="$OperServ(nickp)"} {
          if {$commande=="register"} {
             set arg [split $arg]
             set dir [lindex $arg 4]
             set dir [::nickdebug $dir]
             set configs(nickdir) "/home/ircshell/ircd/Nick"
             if {$dir==""} {
                putdcc $OperServ(idx) ":$OperServ(nickp) NOTICE $pseudo :[::msgcat::mc m9]"
                return
             }
             file dirname $configs(nickdir)/$dir
             if [file exist $dir] {
                putdcc $OperServ(idx) ":$OperServ(nickp) NOTICE $pseudo :[::msgcat::mc m10]"
                return
             }
             set dir $configs(nickdir)/$dir
             catch {exec mkdir $dir}
             set fo "[open $dir/identd.txt w]"
             puts -nonewline $fo [lindex $arg 5]
             close $fo
             set fo "[open $dir/clef-reg.txt w]"
             puts -nonewline $fo [lindex $arg 6]
             close $fo
             putdcc $OperServ(idx) ":$OperServ(nickp) NOTICE $pseudo :[::msgcat::mc m12] [::msgcat::mc m13]"
             putdcc $OperServ(idx) ":$OperServ(nick) PRIVMSG $OperServ(log) :[::msgcat::mc m5] [::msgcat::mc m11] \037\0034$pseudo\037\0034"
          }
        }



Messages In This Thread
Soucis de majuscules. - by aliasangelius - 23/07/2012, 20:59
RE: Soucis de majuscules. - by CrazyCat - 23/07/2012, 21:08
RE: Soucis de majuscules. - by aliasangelius - 24/07/2012, 14:34
RE: Soucis de majuscules. - by CrazyCat - 24/07/2012, 17:08
RE: Soucis de majuscules. - by aliasangelius - 25/07/2012, 11:09
RE: Soucis de majuscules. - by CrazyCat - 25/07/2012, 11:12
RE: Soucis de majuscules. - by aliasangelius - 25/07/2012, 11:14

Forum Jump:


Users browsing this thread: 1 Guest(s)