diff options
Diffstat (limited to 'src/keyboard.c')
| -rw-r--r-- | src/keyboard.c | 22 |
1 files changed, 21 insertions, 1 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index 51eac369e7c..8705c3cd65f 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -329,6 +329,9 @@ static Lisp_Object Qsave_session; #ifdef HAVE_DBUS static Lisp_Object Qdbus_event; #endif +#ifdef HAVE_XWIDGETS +Lisp_Object Qxwidget_event; +#endif static Lisp_Object Qconfig_changed_event; /* Lisp_Object Qmouse_movement; - also an event header */ @@ -4030,6 +4033,13 @@ kbd_buffer_get_event (KBOARD **kbp, kbd_fetch_ptr = event + 1; } #endif +#ifdef HAVE_XWIDGETS + else if (event->kind == XWIDGET_EVENT) + { + obj = make_lispy_event (event); + kbd_fetch_ptr = event + 1; + } +#endif else if (event->kind == CONFIG_CHANGED_EVENT) { obj = make_lispy_event (event); @@ -5925,7 +5935,13 @@ make_lispy_event (struct input_event *event) return Fcons (Qdbus_event, event->arg); } #endif /* HAVE_DBUS */ - +#ifdef HAVE_XWIDGETS + case XWIDGET_EVENT: + { + printf("cool, an xwidget event arrived in make_lispy_event!\n"); + return Fcons (Qxwidget_event,event->arg); + } +#endif case CONFIG_CHANGED_EVENT: return Fcons (Qconfig_changed_event, Fcons (event->arg, @@ -11543,6 +11559,10 @@ syms_of_keyboard (void) DEFSYM (Qdbus_event, "dbus-event"); #endif +#ifdef HAVE_XWIDGETS + Qxwidget_event = intern ("xwidget-event"); + staticpro (&Qxwidget_event); +#endif DEFSYM (QCenable, ":enable"); DEFSYM (QCvisible, ":visible"); DEFSYM (QChelp, ":help"); |