NAME

  UAV::Pilot::SDL::Events

SYNOPSIS

    my $condvar = AnyEvent->condvar;
    my $sdl_events = UAV::Pilot::SDL::Events->new({
        condvar => $condvar,
    });
    $sdl_events->register( ... );
    $sdl_events->init_event_loop;
    $condvar->recv;

DESCRIPTION

Handles the SDL event loop in terms of AnyEvent. In particular, it automatically handles SDL_QUIT events, which you'll need if you open any SDL windows (which UAV::Pilot::Control::ARDrone::SDLNavOutput does, for instance). Without that processing, you would need to manually stop the process with kill -9 or some such.

METHODS

new

    new({
        condvar => $cv,
    })

Constructor. The condvar argument is an AnyEvent::Condvar.

register

    register( $event_handler )

Adds a object that does the UAV::Pilot::SDL::EventHandler role to the list. The process_events method on that object will be called each time the event loop runs.

init_event_loop

Sets up the event loop. Note that you must still call recv on the AnyEvent::Condvar to start the loop running.