Re: Tk et gettext
Laurent Pelecq écrivait :
> Patrice Karatchentzeff <p.karatchentzeff@free.fr> writes:
> > Sauf que... le programme qui fonctionnait *avant* ne fonctionne plus
> > *maintenant*. Il s'arrête en me disant qu'il ne trouve plus un
> > sous-programme qui existe bien quelques lignes plus bas. Je n'ai
> > aucune indication (avec le -w) d'un malaise de Perl sur l'i18n des
> > fichiers.
>
> Et avec le debogueur ça ne donne pas plus de renseignement ?
Non ; je sors le même message d'erreur au même endroit (après avoir
tapé sur la touche Entrée pendant un quart d'heure ;-) ).
J'ai essayé de zapé l'appel aux sous-programmes « pour voir » mais il
plante plus loin avec un
Can't call method "tagConfigure" on an undefined value at ./GUI_log.pl
line 27
c'est-à-dire sur
# All colors tag
#
sub AllTag
{
my ($win) = @_;
foreach $color (qw/black red blue orange green4 yellow3
DarkViolet LightSlateBlue navy/)
{
$win -> tagConfigure
(
"$color",
-font => '-*-fixed-medium-*-*-*-13-*-75-*-*-*-*-1',
-foreground => "$color",
);
};
}
or, c'est tout à fait générique et indépendant : je subodorre donc que
le gettext met une merde noire dans les différentes références de
Perl.
Je vais donc essayé un petit programme « pour voir ».
Pas au point comme truc :-(
PK
--
|\ _,,,---,,_ Patrice KARATCHENTZEFF
ZZZzz /,`.-'`' -. ;-;;,_ mailto:p.karatchentzeff@free.fr
|,4- ) )-,_. ,\ ( `'-' http://p.karatchentzeff.free.fr
'---''(_/--' `-'\_)
Reply to: