18/01/2009, 17:17
Bonjour,
BdS j'ai modifier la ligne
par
cela fonctionne mais j'ai un autre souci la news ne se lit pas entierement
Je pense que le problème vient de cette ligne
en particulier [lindex $line 1]
Mais je ne sais pas comment régler se problème
Ensuite je ne sais pas ou intégrer cette ligne dans mon code
je l'avais mise de cette manière mais sa ne fonctionne pas :s
Et pour finir comment créer un !newslist qui donnerais toute les news enregistrer sur la base en notice.
Cordialement Aragorn
BdS j'ai modifier la ligne
tcl
set $user [lindex $line 0]
par
tcl
set user [lindex $line 0]
cela fonctionne mais j'ai un autre souci la news ne se lit pas entierement
tcl
-16:04:34- ‹Aragorn› !addnews sa marche ou pas
-16:04:36- Notice News:Vampire Votre news a été enregistrée
-16:04:42- ‹Aragorn› !news 1
-16:04:43- ‹News› Aragorn »» sa
Je pense que le problème vient de cette ligne
tcl
putserv "PRIVMSG $::backroom $user\00312 »» [lindex $line 1]"
en particulier [lindex $line 1]
Mais je ne sais pas comment régler se problème
Ensuite je ne sais pas ou intégrer cette ligne dans mon code
tcl
clock format [clock seconds] -format "%d:%m:%y"
je l'avais mise de cette manière mais sa ne fonctionne pas :s
tcl
bind pub - "!addnews" news:sent
proc news:sent {nick uhost handle chan text} {
set fp [open $::base a]
putserv "PRIVMSG $::backroom $user\00312 »» [lindex $line 1]"
puts $fp "$nick $text"
close $fp
putserv "NOTICE $nick :\00312Votre news a été enregistrée"
}
Et pour finir comment créer un !newslist qui donnerais toute les news enregistrer sur la base en notice.
Cordialement Aragorn