28/11/2007, 14:19
(Modification du message : 28/11/2007, 14:46 par MenzAgitat.)
Depuis hier, le script ne fonctionne plus correctement car le site web sur lequel il va chercher les définitions a changé sa mise en page et la structure de ses URL.
En attendant une version corrigée et améliorée (ce qui ne devrait pas tarder), voici un correctif rapide à faire vous-même :
Ouvrez mediadico.tcl dans un éditeur de texte.
----------------------------
cherchez
remplacez par
----------------------------
cherchez
remplacez par
----------------------------
cherchez
remplacez par
----------------------------
cherchez
(je n'ai pas utilisé la balise [tcl] ici car le • est interprété >< )
----------------------------
Sauvez, rehashez et voilà.
En attendant une version corrigée et améliorée (ce qui ne devrait pas tarder), voici un correctif rapide à faire vous-même :
Ouvrez mediadico.tcl dans un éditeur de texte.
----------------------------
cherchez
tcl
set URL_site "http://dictionnaire.tv5.org/dictionnaires.asp?Action=1&mot=$arg&che=1"
remplacez par
tcl
set URL_site "http://dictionnaire.tv5.org/dictionnaires.asp?Action=1¶m=$arg&che=1"
----------------------------
cherchez
tcl
regsub -all "</B></FONT><BR>" $res "\003 :" res
remplacez par
tcl
regsub -all "</B></FONT><BR>" $res "\003" res
----------------------------
cherchez
tcl
regsub -all "<BR>" $res "\n" res
remplacez par
tcl
regsub -all "</FONT><BR> </FONT><BR> <BR><BR>" $res "\n" res
regsub -all "</FONT><BR> </FONT><BR><BR>" $res "\n" res
regsub -all "<BR><BR>" $res "\n" res
regsub -all "<BR>" $res "\00312-\003" res
----------------------------
cherchez
Citation :regsub -all "•" $res "\00312-\003" reset effacez cette ligne.
(je n'ai pas utilisé la balise [tcl] ici car le • est interprété >< )
----------------------------
Sauvez, rehashez et voilà.