[script] Eggdrop RSS Syndication

[Cain]

@CrazyCat
J'ai essayé d'integrer le tcl oqpme.tcl que tu avais donné :

tclcopier

package require http
 
namespace eval oqpme {
    variable url "http://oqp.me/?q="
 
    bind pub - "!oqp" oqpme::short
    proc short { nick uhost handle chan args} {
        set long "$oqpme::url[lindex [split $args] 0]"
        set ckey [::http::geturl $long]
        putserv "PRIVMSG $chan :[::http::data $ckey]"
    }
 
}

Ca donne le résultat suivant :

<@BakaBoT> \[Sport\] Ligue 1: Montpellier étrille Rennes et s'installe en tête : [:qpme::short http://www.2424actu.fr/actualite-sportiv...e-2918087/]

et en PL la ligne suivante : RSS Eval Error: wrong # args: should be ":qpme::short nick uhost handle chan ..."

Une idée ?