emacs-29 a3063f0bc87: Add a binding for enriched-toggle-markup

[Robert Pluim]

branch: emacs-29
commit a3063f0bc873707c167cf51f3eb9c0b1675819e6
Author: Robert Pluim <rpluim@gmail.com>
Commit: Robert Pluim <rpluim@gmail.com>

    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.")