bug in 2.1.2

2.1.2 code reads:

Uint8
JoyAxisEventValue ( e )
        SDL_Event *e
        CODE:
                RETVAL = e->jaxis.value;
        OUTPUT:
                RETVAL


SDL_events.h reads:

typedef struct SDL_JoyAxisEvent {
	Uint8 type;	/* SDL_JOYAXISMOTION */
	Uint8 which;	/* The joystick device index */
	Uint8 axis;	/* The joystick axis index */
	Sint16 value;	/* The axis value (range: -32768 to 32767) */
} SDL_JoyAxisEvent;


Hence, the value reported from sdlperl is broken.

-- 
Guillaume Cottenceau - http://zarb.org/~gc/