Lines Matching refs:keyCodes
72 our %keyCodes; # all keysyms, hashed by keycode
382 if ( $keyCodes{$code} ) {
383 my $name = $keyCodes{$code};
475 my $sym = $keyCodes{$code};
547 $sym = $keyCodes{$code} if ( $keyCodes{$code} );
644 my $sym = $keyCodes{$code};
1099 $keyCodes{$value} = $name unless ( $keyCodes{$value} );
1100 printf "keySyms{$name} = '$value', keyCodes{$value} = $name\n"
1109 @keys = keys %keyCodes;
1254 my @keyCodes = keys %keyCodes;
1256 for my $c ( 0 .. $#keyCodes ) {
1257 $sortCodes[$c] = sprintf "%08X", hex $keyCodes[$c];
1262 my $sym = $keyCodes{$code};