[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 5784b42: Move the Text Properties menu back to Edit
From: |
Eli Zaretskii |
Subject: |
master 5784b42: Move the Text Properties menu back to Edit |
Date: |
Tue, 11 May 2021 16:18:27 -0400 (EDT) |
branch: master
commit 5784b421ee41632f67a517add8806d13cc7bfb96
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>
Move the Text Properties menu back to Edit
* lisp/textmodes/enriched.el (enriched-mode): Don't add "Text
Properties" sub-menu to Text mode menu.
* lisp/facemenu.el (menu-bar-edit-menu): Add "Text Properties"
sub-menu back to the Edit menu.
---
lisp/facemenu.el | 4 ++++
lisp/textmodes/enriched.el | 4 ----
2 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index 76ac235..29ee4f8 100644
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -244,6 +244,10 @@ return a string which is inserted. It may set
`facemenu-end-add-face'."
(define-key map [fc] (cons "Face" 'facemenu-face-menu)))
(defalias 'facemenu-menu facemenu-menu)
+(easy-menu-add-item
+ menu-bar-edit-menu nil
+ ["Text Properties" facemenu-menu])
+
(defvar facemenu-keymap
(let ((map (make-sparse-keymap "Set face")))
(define-key map "o" (cons "Other..." 'facemenu-set-face))
diff --git a/lisp/textmodes/enriched.el b/lisp/textmodes/enriched.el
index e681007..ba8fac8 100644
--- a/lisp/textmodes/enriched.el
+++ b/lisp/textmodes/enriched.el
@@ -38,7 +38,6 @@
;;; Code:
-(require 'facemenu)
(provide 'enriched)
;;;
@@ -236,9 +235,6 @@ Commands:
(t ; Turn mode on
(add-hook 'change-major-mode-hook
#'enriched-before-change-major-mode nil 'local)
- (easy-menu-add-item
- text-mode-menu nil
- ["Text Properties" facemenu-menu :help "Change text properties"])
(add-to-list 'buffer-file-format 'text/enriched)
;; Save old variable values before we change them.
;; These will be restored if we exit Enriched mode.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 5784b42: Move the Text Properties menu back to Edit,
Eli Zaretskii <=