554 |
Lisp_Object Qlanguage_change; |
Lisp_Object Qlanguage_change; |
555 |
#endif |
#endif |
556 |
Lisp_Object Qdrag_n_drop; |
Lisp_Object Qdrag_n_drop; |
557 |
|
Lisp_Object Qsave_session; |
558 |
|
|
559 |
/* Lisp_Object Qmouse_movement; - also an event header */ |
/* Lisp_Object Qmouse_movement; - also an event header */ |
560 |
|
|
561 |
/* Properties of event headers. */ |
/* Properties of event headers. */ |
3733 |
kbd_fetch_ptr = event + 1; |
kbd_fetch_ptr = event + 1; |
3734 |
} |
} |
3735 |
#endif |
#endif |
3736 |
|
else if (event->kind == save_session_event) |
3737 |
|
{ |
3738 |
|
obj = Fcons (Qsave_session, Qnil); |
3739 |
|
kbd_fetch_ptr = event + 1; |
3740 |
|
} |
3741 |
/* Just discard these, by returning nil. |
/* Just discard these, by returning nil. |
3742 |
With MULTI_KBOARD, these events are used as placeholders |
With MULTI_KBOARD, these events are used as placeholders |
3743 |
when we need to randomly delete events from the queue. |
when we need to randomly delete events from the queue. |
5402 |
/* A user signal. */ |
/* A user signal. */ |
5403 |
return *lispy_user_signals[event->code]; |
return *lispy_user_signals[event->code]; |
5404 |
|
|
5405 |
|
case save_session_event: |
5406 |
|
return Qsave_session; |
5407 |
|
|
5408 |
/* The 'kind' field of the event is something we don't recognize. */ |
/* The 'kind' field of the event is something we don't recognize. */ |
5409 |
default: |
default: |
5410 |
abort (); |
abort (); |
10367 |
Qdrag_n_drop = intern ("drag-n-drop"); |
Qdrag_n_drop = intern ("drag-n-drop"); |
10368 |
staticpro (&Qdrag_n_drop); |
staticpro (&Qdrag_n_drop); |
10369 |
|
|
10370 |
|
Qsave_session = intern ("save-session"); |
10371 |
|
staticpro(&Qsave_session); |
10372 |
|
|
10373 |
Qusr1_signal = intern ("usr1-signal"); |
Qusr1_signal = intern ("usr1-signal"); |
10374 |
staticpro (&Qusr1_signal); |
staticpro (&Qusr1_signal); |
10375 |
Qusr2_signal = intern ("usr2-signal"); |
Qusr2_signal = intern ("usr2-signal"); |
10954 |
"ignore-event"); |
"ignore-event"); |
10955 |
initial_define_lispy_key (Vspecial_event_map, "make-frame-visible", |
initial_define_lispy_key (Vspecial_event_map, "make-frame-visible", |
10956 |
"ignore-event"); |
"ignore-event"); |
10957 |
|
initial_define_lispy_key (Vspecial_event_map, "save-session", |
10958 |
|
"handle-save-session"); |
10959 |
} |
} |