NAME

Prima::sys::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.

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

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.

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.

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