key_press event

Hello all,
I want to wrap the enter key on my Gtk::Entry,
I use this callback to do this and it works:

sub envoi_msg                                                       
        my $self = shift;                                           
        my (@event) = @_;                                           
        my $event = pop( @event );                                  
        if( (defined($event->{'type'})) and ( $event->{'type'} eq 'key_press'))      
                print   "test-".$event->{'keyval'}."-\n";                 

It show me the good key code, but I don't find how to have human
readable constant for the keycode, like GDK_KP_Enter!

Attachment: pgpXuP9uBtgZv.pgp
Description: PGP signature

[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]