little hint to key event usage

[herbert breunung]

dear comrads

 

in 

http://bitbucket.org/lichtkind/kephra/src/e40b97af08d906041b539c456f456e173385cf7a/lib/sed.pl?at=sp2 in conjunction with

htts://bitbucket.org/lichtkind/kephra/src/e40b97af08d906041b539c456f456e173385cf7a/lib/Kephra/API/KeyMap.pm?at=sp2

 

I do stuff like

 

        Wx::Event::EVT_KEY_DOWN($ed , sub {
                my ($ed, $event) = @_;
                my $def = Kephra::API::KeyMap::definition_from_event($event);
                if    ($def eq 'ctrl+o'){ open_file( Kephra::App::Dialog::get_file_open() ) }

 

 

you maybe wan to copy that

 

best

herbert