The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Prima::Test - GUI test tools

DESCRIPTION

The module contains a small set or tool used for testing of Prima-related code together with standard perl Test:: suite.

SYNOPSIS

        use Test::More;
        use Prima::Test;
        plan tests => 1;
        ok( create_window, "can create window");

USAGE

Methods

create_window %args

Creates a standard simple Prima window, returns its handle

set_flag,get_flag,reset_flag

These manipulate the state of an internal $flag that stops event loop when set.

wait_flag

Waits for the flag to be raised in 500 msec, or returns false.

no-X11 environment

By default fires skip_all condition if running without X11 connection. If the test can be ran without X11, use as:

        use Prima::Test qw(noX11);

which signals the module not to do any GUI initialization.

AUTHORS

Upasana Shukla, <me@upasana.me>, Dmitry Karasik, <dmitry@karasik.eu.org>.

SEE ALSO

Prima, t/*/*.t