namespace eval ::xwel {
        # Nous vérifions si ya le package requis pour le msgcat.
        package require msgcat

        # Nous mettons la langue de msgcat en français.
        ::msgcat::mclocale fr

        # Message msgcat.
        ::msgcat::mcset fr Xjoin "\0038,1 Bonjour \00311,1 %s \00313,1 et bienvenue sur rencontre-amical \0035,\002\0036Bon Tchat !!!"

        setudef flag WS

            bind join - "*" [namespace current]::wj
            proc wj {nick uhost handle chan} {
              if {![channel get $chan WS] || [isbotnick $nick]} return
              putserv "PRIVMSG $chan :[::msgcat::mc Xjoin $nick]"
            }

            bind pub o "!won" [namespace current]::won
            proc won { nick host hand chan arg } {
              if ![channel get $chan WS] {
                channel set $chan +WS
                putquick "PRIVMSG $chan :Welcome Activé sur $chan !"
                return
              }
              putquick "PRIVMSG $chan :Welcome déjà Activé sur $chan !"
            }

            bind pub o "!woff" [namespace current]::woff
            proc woff { nick host hand chan arg } {
              if [channel get $chan WS] {
                channel set $chan -WS
                putquick "PRIVMSG $chan :Welcome Désactivé sur $chan !"
                return
              }
              putquick "PRIVMSG $chan :Welcome déjà Désactivé sur $chan !"
            }
    }