URL: https://linuxfr.org/forums/programmation-perl/posts/tutoriel-pour-utiliser-glade-et-perl
Title: Tutoriel pour utiliser glade et perl
Authors: psychoslave__
Date: 2008年11月12日T17:23:16+01:00
Tags:
Score: 0
Salut, salut!
Alors voila, tout le monde se plaint que pour uploader des fichiers au wiki de culture libre (mediawiki), c'est chiant si on veut uploader tout un lot de photo par exemple. Après avoir fait un tour de l'existant, je décide de faire une petite interface d'upload à mediawiki en utilisant la lib[1] perl qui va bien.
Et comme dans mes livres perl j'ai appris que la paresse est une vertu, j'ouvre directement glade et commence à jeter des libellés par-ci des boîtes de textes par là, en saupoudrant d'autres éléments gtk.
Seulement je n'ai pas trouvé de tutoriel pour utiliser cette interface avec perl. Un petit coups de perldoc me fait pondre :
#!/usr/bin/perl
#
use Gnome2;
use Gtk2::GladeXML;
Gnome2::Program->init("test","1.0");
my $gladexml= Gtk2::GladeXML->new('mmu-gtk.glade');
$gladexml->signal_autoconnect_from_package('window1');
Gtk2->main();
Avec bien sûr mmu-gtk.glade étant mon fichier glade, qui contiens bien une fenêtre nommé window1.
Quand je lance mon petit programme qui n'est pas encore censer faire grand chose, je me vois gratifier du message suivant :
% ./test.pl
Gtk-CRITICAL **: gtk_widget_grab_default: assertion `GTK_WIDGET_CAN_DEFAULT (widget)' failed at ./test.pl line 8.
Voilà, si vous avez des idées ou de la documentation à me conseiller, je suis preneur. :)
[1] [http://search.cpan.org/dist/MediaWiki/lib/MediaWiki.pm](http://search.cpan.org/dist/MediaWiki/lib/MediaWiki.pm)