[TCL] Motus (version actuelle : 3.355)

[MenzAgitat]

Salut MenzAgitat
La modification que tu fais pour le dictionnaire est elle à faire sur motus.tcl, sur mediadico.tcl ou sur les deux ??

Les deux scripts ont besoin d'être corrigés, voir ici pour ce qui concerne MediaDico.tcl.

A priori apres divers tests il faut que la ligne soit dans motus.tcl:

set URL_site "http://dictionnaire.tv5.org/dictionnaires.asp?Action=1&mot=$mot&che=1"

Sinon ca affiche tjs la définition de "Dictionnaire"

Oui, c'est ce que je disais, voir plus haut



Edit : oups, je m'aperçois de mon erreur, en fait c'est l'inverse qu'il faut faire ...

Voici donc le correctif (corrigé) à appliquer :
cherchez

tclcopier

set URL_site "http://dictionnaire.tv5.org/dictionnaires.asp?Action=1&param=$mot&che=1"

remplacez par

tclcopier

set URL_site "http://dictionnaire.tv5.org/dictionnaires.asp?Action=1&mot=$mot&che=1"

------------------
cherchez

tclcopier

regsub -all "</B></FONT><BR>" $res "\003 :" res

remplacez par

tclcopier

regsub -all "</B></FONT><BR>" $res "\003" res

------------------
cherchez

tclcopier

regsub -all "<BR>" $res "\n" res

remplacez par

tclcopier

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 "\00307|\003" res

------------------
cherchez

regsub -all "&#149" $res "[color 07]|\003" res

et supprimez cette ligne.

Voilà, désolé pour l'erreur et merci de l'avoir fait remarquer.