diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-11-01 01:44:01 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-11-01 01:44:01 +0100 |
| commit | 686d85c767d7c14d0cc6351701396cd71da37630 (patch) | |
| tree | e3b0b08c240877227926bc9d961a72c6070fe8fb /src/keymap.c | |
| parent | c825c825256475ac5c74882811a44228140f18ee (diff) | |
| download | emacs-686d85c767d7c14d0cc6351701396cd71da37630.tar.gz emacs-686d85c767d7c14d0cc6351701396cd71da37630.tar.bz2 emacs-686d85c767d7c14d0cc6351701396cd71da37630.zip | |
Include the major mode name in the `C-h b' output
* lisp/calc/calc-help.el (calc-describe-bindings): Don't add the
name since it's there now.
* src/keymap.c (Fdescribe_buffer_bindings): Include the major mode
name for symmetry with the minor modes (and because it's easy to
forget).
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/keymap.c b/src/keymap.c index 08f37dbd8b5..29d2ca7ab7e 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -2933,7 +2933,10 @@ You type Translation\n\ { if (EQ (start1, BVAR (XBUFFER (buffer), keymap))) { - Lisp_Object msg = build_unibyte_string ("\f\nMajor Mode Bindings"); + Lisp_Object msg = + CALLN (Fformat, + build_unibyte_string ("\f\n`%s' Major Mode Bindings"), + XBUFFER (buffer)->major_mode_); CALLN (Ffuncall, Qdescribe_map_tree, start1, Qt, shadow, prefix, |