sub skip_tests { my $test_name = shift; return "Gtk needs a DISPLAY (set one today, okay?)" unless ( defined $ENV{DISPLAY} and length $ENV{DISPLAY} ); return "Gtk tests require the Gtk module" if do { eval "use Gtk"; $@ }; return "Gtk init failed. Is DISPLAY valid?" unless defined Gtk->init_check; if ($test_name eq "z_rt39872_sigchld_stop") { return "Gdk crashes"; } return; }
POE::Loop::Gtk - a bridge that allows POE to be driven by Gtk 1.x
See POE::Loop.
use Gtk; use POE; # Rest of your program here.
POE::Loop::Gtk replaces POE's internal event loop with the Gtk module. This allows programs to use both POE and Gtk 1.x at the same time.
Please see POE::Loop::Glib for more modern Gtk2 and Gtk3 support.
POE::Loop::Gtk implements the interface documented in POE::Loop. Therefore it has no documentation of its own. Please see POE::Loop for more details.
This project needs a developer or tester. Nobody can seem to get the Gtk dependency built to verify whether this event loop adapter works. Maybe you can?
None known, but see "HELP WANTED".
POE, POE::Loop, Gtk, POE::Loop::Glib, POE::Loop::PerlSignals
POE::Loop::Gtk is Copyright 1998-2013 Rocco Caputo. All rights reserved. POE::Loop::Gtk is free software; you may redistribute it and/or modify it under the same terms as Perl itself.
To install POE::Loop::Gtk, copy and paste the appropriate command in to your terminal.
cpanm
cpanm POE::Loop::Gtk
CPAN shell
perl -MCPAN -e shell install POE::Loop::Gtk
For more information on module installation, please visit the detailed CPAN module installation guide.