Mercurial > hg > xemacs-beta
annotate lib-src/digest-doc.c @ 4780:2fd201d73a92
Call character_to_event on characters received from XIM, event-Xt.c
src/ChangeLog addition:
2009-12-17 Aidan Kehoe <kehoea@parhasard.net>
* events.h (character_to_event_meta_behavior): New enumeration,
describing what character_to_event should do with characters in
the range ?\x80-?\xFF, and passed as the third argument to
character_to_event instead of the binary use_console_meta_flag.
* events.c (character_to_event, Fcharacter_to_event):
* event-unixoid.c (read_event_from_tty_or_stream_desc):
* event-stream.c (maybe_kbd_translate, maybe_kbd_translate):
* event-msw.c (mswindows_need_event):
Use the new enumeration.
* event-Xt.c (x_to_emacs_keysym):
Call character_to_event when we receive XLookupChars events,
passing latin_1_maps_to_itself as the meta_behavior flag,
addressing the problem FKtPp sees in 87bpi9mwpu.fsf@yahoo.com.cn
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Thu, 17 Dec 2009 17:51:38 +0000 |
parents | ecf1ebac70d8 |
children | ed624ab64583 06dd936cde16 |
rev | line source |
---|---|
428 | 1 /* Give this program DOCSTR.mm.nn as standard input |
2 and it outputs to standard output | |
3 a file of nroff output containing the doc strings. | |
4 | |
5 See also sorted-doc.c, which produces similar output | |
6 but in texinfo format and sorted by function/variable name. */ | |
7 | |
8 #ifdef emacs | |
438 | 9 #include <config.h> |
428 | 10 #endif |
11 #include <stdio.h> | |
12 | |
13 int | |
2367 | 14 main (int argc, char **argv) |
428 | 15 { |
16 register int ch; | |
17 register int notfirst = 0; | |
18 | |
19 printf (".TL\n"); | |
613 | 20 printf ("Command Summary for XEmacs\n"); |
21 printf (".AU\nThe XEmacs Advocacy Group\n"); | |
428 | 22 while ((ch = getchar ()) != EOF) |
23 { | |
24 if (ch == '\037') | |
25 { | |
26 if (notfirst) | |
27 printf ("\n.DE"); | |
28 else | |
29 notfirst = 1; | |
30 | |
31 printf ("\n.SH\n"); | |
32 | |
33 ch = getchar (); | |
34 printf (ch == 'F' ? "Function " : "Variable "); | |
35 | |
36 while ((ch = getchar ()) != '\n') /* Changed this line */ | |
37 { | |
38 if (ch != EOF) | |
39 putchar (ch); | |
40 else | |
41 { | |
42 ungetc (ch, stdin); | |
43 break; | |
44 } | |
45 } | |
46 printf ("\n.DS L\n"); | |
47 } | |
48 else | |
49 putchar (ch); | |
50 } | |
51 return 0; | |
52 } |