Mercurial > emacs
changeset 29695:5201e6953968
(describe_buffer_bindings): Add `\f\n' in front of titles.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Fri, 16 Jun 2000 15:17:41 +0000 |
| parents | e57ca3c2fb6d |
| children | a5051216d618 |
| files | src/keymap.c |
| diffstat | 1 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/keymap.c Fri Jun 16 13:23:54 2000 +0000 +++ b/src/keymap.c Fri Jun 16 15:17:41 2000 +0000 @@ -2479,7 +2479,9 @@ if (!SYMBOLP (modes[i])) abort(); - p = title = (char *) alloca (40 + XSYMBOL (modes[i])->name->size); + p = title = (char *) alloca (42 + XSYMBOL (modes[i])->name->size); + *p++ = '\f'; + *p++ = '\n'; *p++ = '`'; bcopy (XSYMBOL (modes[i])->name->data, p, XSYMBOL (modes[i])->name->size); @@ -2505,17 +2507,17 @@ if (!NILP (start1)) { describe_map_tree (start1, 1, shadow, prefix, - "Major Mode Bindings", nomenu, 0, 0); + "\f\nMajor Mode Bindings", nomenu, 0, 0); shadow = Fcons (start1, shadow); } describe_map_tree (current_global_map, 1, shadow, prefix, - "Global Bindings", nomenu, 0, 1); + "\f\nGlobal Bindings", nomenu, 0, 1); /* Print the function-key-map translations under this prefix. */ if (!NILP (Vfunction_key_map)) describe_map_tree (Vfunction_key_map, 0, Qnil, prefix, - "Function key map translations", nomenu, 1, 0); + "\f\nFunction key map translations", nomenu, 1, 0); call0 (intern ("help-mode")); Fset_buffer (descbuf);