Mercurial > emacs
view lwlib/xlwmenu.h @ 22833:a3fe2af7cefb
(Qinput_method_function): New variable.
(syms_of_keyboard): Init and staticpro it.
(read_key_sequence): Bind input-method-function,
and set it to nil after reading the first event.
(raw_keybuf, raw_keybuf_count): New variables, to record
raw input events as they are read with read_char.
(GROW_RAW_KEYBUF): New macro.
(Fthis_single_command_raw_keys): New function.
(syms_of_keyboard): defsubr it.
(read_char): Call the input method if appropriate.
Change logic for distinguishing rereads from new events;
use local var `reread'. Take events from
Vunread_input_method_events and Vunread_post_input_method_events.
(Vunread_input_method_events, Vunread_post_input_method_events)
(Vinput_method_function): New variable.
(syms_of_keyboard): Set up Lisp vars.
(command_loop_1): Check Vunread_input_method_events and
Vunread_post_input_method_events along with Vunread_command_events.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 26 Jul 1998 23:03:58 +0000 |
parents | 20cb460b85d3 |
children | 8b90339beb04 |
line wrap: on
line source
#ifndef _XlwMenu_h #define _XlwMenu_h /*********************************************************************** * * XlwMenu Widget * ***********************************************************************/ #include "lwlib.h" /* Resource names used by the XlwMenu widget */ #define XtNbuttonForeground "buttonForeground" #define XtCButtonForeground "ButtonForeground" #define XtNmargin "margin" #define XtNhorizontalSpacing "horizontalSpacing" #define XtNverticalSpacing "verticalSpacing" #define XtNarrowSpacing "arrowSpacing" #define XtNmenu "menu" #define XtCMenu "Menu" #define XtNopen "open" #define XtNselect "select" #define XtNmenuBorderWidth "menuBorderWidth" #define XtNhorizontal "horizontal" #define XtCHorizontal "Horizontal" #define XtNcursor "cursor" #define XtNCursor "Cursor" #define XtNshowGrip "showGrip" #define XtCShowGrip "ShowGrip" #define XtNresizeToPreferred "resizeToPreferred" #define XtCResizeToPreferred "ResizeToPreferred" #define XtNallowResize "allowResize" #define XtCAllowResize "AllowResize" /* Motif-compatible resource names */ #define XmNshadowThickness "shadowThickness" #define XmCShadowThickness "ShadowThickness" #define XmNtopShadowColor "topShadowColor" #define XmCTopShadowColor "TopShadowColor" #define XmNbottomShadowColor "bottomShadowColor" #define XmCBottomShadowColor "BottomShadowColor" #define XmNtopShadowPixmap "topShadowPixmap" #define XmCTopShadowPixmap "TopShadowPixmap" #define XmNbottomShadowPixmap "bottomShadowPixmap" #define XmCBottomShadowPixmap "BottomShadowPixmap" #define XmRHorizontalDimension "HorizontalDimension" typedef struct _XlwMenuRec *XlwMenuWidget; typedef struct _XlwMenuClassRec *XlwMenuWidgetClass; extern WidgetClass xlwMenuWidgetClass; void pop_up_menu (); #endif /* _XlwMenu_h */