From: Robert Pluim <rpluim@gmail.com>
Date: Tue, 25 Apr 2023 10:27:00 +0000 (+0200)
Subject: Add a binding for enriched-toggle-markup
X-Git-Tag: emacs-29.0.92~78
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a3063f0bc87;p=emacs.git

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

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