From a3063f0bc873707c167cf51f3eb9c0b1675819e6 Mon Sep 17 00:00:00 2001 From: Robert Pluim Date: Tue, 25 Apr 2023 12:27:00 +0200 Subject: [PATCH] Add a binding for enriched-toggle-markup * lisp/textmodes/enriched.el (enriched-mode-map): Bind 'enriched-toggle-markup' to 'M-o m'. * etc/NEWS: Announce the change. --- etc/NEWS | 2 +- lisp/textmodes/enriched.el | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/etc/NEWS b/etc/NEWS index a3457d70340..e33e40d9009 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -1769,7 +1769,7 @@ or can take a long time to render. +++ *** New command 'enriched-toggle-markup'. This allows you to see the markup in 'enriched-mode' buffers (e.g., -the "HELLO" file). +the "HELLO" file). Bound to 'M-o m' by default. ** Shell Script Mode diff --git a/lisp/textmodes/enriched.el b/lisp/textmodes/enriched.el index ec3046decd4..92be5a52bf2 100644 --- a/lisp/textmodes/enriched.el +++ b/lisp/textmodes/enriched.el @@ -192,6 +192,7 @@ The value is a list of \(VAR VALUE VAR VALUE...).") (define-key map "\C-c[" #'set-left-margin) (define-key map "\C-c]" #'set-right-margin) (define-key map "\M-o" #'facemenu-keymap) + (define-key map "\M-om" #'enriched-toggle-markup) map) "Keymap for Enriched mode.") -- 2.39.2