Re: Re: xjed and keypad, pc-select-mode

[Nicolas Burrus <nicolas.burrus@xxxxxxxxxxxxx>]

On Thursday 08 August 2002 10:19, you wrote:
> On Wed, 7 Aug 2002 14:28:35 +0200 wrote Nicolas Burrus 
>
> Try the code in cuamark.sl (from my other mail today). 

Ok, I'll have a look at it.

> It lacks support for
> Shift-Ctrl-*, as on my xjed these keys send just the same string as Ctrl-*
> If you have a solution for this ready, I'd like to add it...

My solution for Ctrl-Shift bindings use Xwindow keysyms : 

variable KB_Left    = 0xFF51;
variable KB_Right   = 0xFF53;
variable KB_Down    = 0xFF54;
variable KB_Up      = 0xFF52;
variable KB_PgUp    = 0xFF55;
variable KB_PgDn    = 0xFF56;
variable KB_Home    = 0xFF50;
variable KB_End     = 0xFF57;

% CS stands for Ctrl-Shift
variable Key_Ctrl_Shift_Left  = "CSLeft";
variable Key_Ctrl_Shift_Right   = "CSRight";
variable Key_Ctrl_Shift_Up      = "CSUp";
variable Key_Ctrl_Shift_Down    = "CSDown";
variable Key_Ctrl_Shift_PgUp    = "CSPgUp";
variable Key_Ctrl_Shift_PgDn  = "CSPgDn";
variable Key_Ctrl_Shift_Home  = "CSHome";
variable Key_Ctrl_Shift_End   = "CSEnd";

x_set_keysym (KB_Right, '%', Key_Ctrl_Shift_Right);
x_set_keysym (KB_Left, '%', Key_Ctrl_Shift_Left);
x_set_keysym (KB_Down, '%', Key_Ctrl_Shift_Down);
x_set_keysym (KB_Up, '%', Key_Ctrl_Shift_Up);
x_set_keysym (KB_PgUp, '%', Key_Ctrl_Shift_PgUp);
x_set_keysym (KB_PgDn, '%', Key_Ctrl_Shift_PgDn);
x_set_keysym (KB_Home, '%', Key_Ctrl_Shift_Home);
x_set_keysym (KB_End, '%', Key_Ctrl_Shift_End);

Then you can use Key_Ctrl_Shift_Home, ... to bind your actions.

BTW : The mask flag '%' for x_set_keysym doesn't seem documented, I found it 
in jed source code.

-- 
Nicolas Burrus

--------------------------
To unsubscribe send email to <jed-users-request@xxxxxxxxxxx> with
the word "unsubscribe" in the message body.
Need help? Email <jed-users-owner@xxxxxxxxxxx>.