It seems that SDL_Perl does not contain support for user generated
events. I've been just using random values and other non-event related
constants from SDL::Constants when pushing my own events into the event
queue. It would be great if the following patch could be applied to
lib/SDL/Constants.pl. There is still no way to set the code, data1, and
data2 fields of the SDL_UserEvent structure (this may not even be
possible with the way that SDL_Perl does events in an object oriented
fashion). The values 24 through 31 correspond to the userevent
designated portion of the events enum in SDL-1.2.9.
*** lib/SDL/Constants.pm.old 2005-11-25 00:27:30.000000000 -0600
--- lib/SDL/Constants.pm 2005-11-25 00:27:09.000000000 -0600
***************
*** 293,298 ****
--- 293,306 ----
UTF8_BLENDED
UTF8_SHADED
UTF8_SOLID
+ SDL_USEREVENT1
+ SDL_USEREVENT2
+ SDL_USEREVENT3
+ SDL_USEREVENT4
+ SDL_USEREVENT5
+ SDL_USEREVENT6
+ SDL_USEREVENT7
+ SDL_USEREVENT8
);
***************
*** 562,564 ****
--- 570,580 ----
sub UTF8_BLENDED {32}
sub UTF8_SHADED {16}
sub UTF8_SOLID {8}
+ sub SDL_USEREVENT1 {24}
+ sub SDL_USEREVENT2 {25}
+ sub SDL_USEREVENT3 {26}
+ sub SDL_USEREVENT4 {27}
+ sub SDL_USEREVENT5 {28}
+ sub SDL_USEREVENT6 {29}
+ sub SDL_USEREVENT7 {30}
+ sub SDL_USEREVENT8 {31}
--
Andy <[EMAIL PROTECTED]>
