annotate lwlib/xlwcheckboxP.h @ 5860:916b48abd1c6

event-stream.c, support help-event-list as does GNU. src/ChangeLog addition: 2015-03-14 Aidan Kehoe <kehoea@parhasard.net> Add support for GNU's help-event-list here, useful for accepting F1 and C-h as the help character at the same time. * event-stream.c: * event-stream.c (echo_key_event): Be better about calculation, comments here, in passing. * event-stream.c (help_char_p): New. * event-stream.c (execute_help_form): There's no need to reset the command builder here; the code that did relied on zero-termination, which we can't anymore, and did not actually discard the help character. Remove this. * event-stream.c (Fnext_event): Use help_char_p (). * event-stream.c (command_builder_find_leaf_no_jit_binding): Use help_char_p (). * event-stream.c (vars_of_event_stream): Make help-event-list available. man/ChangeLog addition: 2015-03-14 Aidan Kehoe <kehoea@parhasard.net> * lispref/help.texi (Help Functions): Document help-event-list, just added. lisp/ChangeLog addition: 2015-03-14 Aidan Kehoe <kehoea@parhasard.net> * cus-start.el (all): Describe help-event-list for Custom. * keydefs.el (help-event-list): Initialise it.
author Aidan Kehoe <kehoea@parhasard.net>
date Sat, 14 Mar 2015 01:16:45 +0000
parents 308d34e9f07d
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
398
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
1 /* Checkbox Widget for XEmacs.
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
2 Copyright (C) 1999 Edward A. Falk
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
3
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
4 This file is part of XEmacs.
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
5
5402
308d34e9f07d Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents: 398
diff changeset
6 XEmacs is free software: you can redistribute it and/or modify it
398
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
7 under the terms of the GNU General Public License as published by the
5402
308d34e9f07d Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents: 398
diff changeset
8 Free Software Foundation, either version 3 of the License, or (at your
308d34e9f07d Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents: 398
diff changeset
9 option) any later version.
398
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
10
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
11 XEmacs is distributed in the hope that it will be useful, but WITHOUT
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
14 for more details.
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
15
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
5402
308d34e9f07d Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents: 398
diff changeset
17 along with XEmacs. If not, see <http://www.gnu.org/licenses/>. */
398
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
18
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
19 /*
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
20 * CheckboxP.h - Private definitions for Checkbox widget
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
21 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
22 * Author: Edward A. Falk
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
23 * falk@falconer.vip.best.com
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
24 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
25 * Date: June 30, 1997
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
26 */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
27
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
28 #ifndef _XawCheckboxP_h
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
29 #define _XawCheckboxP_h
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
30
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
31 #include "xlwcheckbox.h"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
32 #include "xlwradioP.h"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
33
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
34 /************************************
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
35 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
36 * Class structure
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
37 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
38 ***********************************/
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
39
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
40 /* New fields for the Checkbox widget class record */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
41 typedef struct _CheckboxClass {
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
42 XtPointer extension;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
43 } CheckboxClassPart;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
44
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
45 /* Full class record declaration */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
46 typedef struct _CheckboxClassRec {
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
47 CoreClassPart core_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
48 SimpleClassPart simple_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
49 #ifdef _ThreeDP_h
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
50 ThreeDClassPart threeD_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
51 #endif
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
52 LabelClassPart label_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
53 CommandClassPart command_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
54 ToggleClassPart toggle_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
55 RadioClassPart radio_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
56 CheckboxClassPart checkbox_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
57 } CheckboxClassRec;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
58
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
59 extern CheckboxClassRec checkboxClassRec;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
60
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
61 /***************************************
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
62 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
63 * Instance (widget) structure
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
64 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
65 **************************************/
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
66
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
67 /* New fields for the Checkbox widget record */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
68 typedef struct {
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
69 /* resources */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
70 Boolean tristate ;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
71
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
72 /* private data */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
73 Boolean pressed ;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
74 Pixmap checkmark ; /* TODO: share these via xmu? */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
75 GC checkmark_GC ;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
76 XtPointer extension;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
77 } CheckboxPart;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
78
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
79 /* Full widget declaration */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
80 typedef struct _CheckboxRec {
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
81 CorePart core;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
82 SimplePart simple;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
83 #ifdef _ThreeDP_h
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
84 ThreeDPart threeD;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
85 #endif
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
86 LabelPart label;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
87 CommandPart command;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
88 TogglePart toggle;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
89 RadioPart radio;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
90 CheckboxPart checkbox;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
91 } CheckboxRec;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
92
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
93 #endif /* _XawCheckboxP_h */