[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-28 7e2b973 2/2: * lisp/textmodes/text-mode.el (text-mode-context-m
From: |
Juri Linkov |
Subject: |
emacs-28 7e2b973 2/2: * lisp/textmodes/text-mode.el (text-mode-context-menu): Rename recently added. |
Date: |
Wed, 27 Oct 2021 13:33:34 -0400 (EDT) |
branch: emacs-28
commit 7e2b973d60cfd30f1828fabd8d9f33127f24e54a
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>
* lisp/textmodes/text-mode.el (text-mode-context-menu): Rename recently
added.
---
lisp/textmodes/text-mode.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/textmodes/text-mode.el b/lisp/textmodes/text-mode.el
index 3243bd3..478cf62 100644
--- a/lisp/textmodes/text-mode.el
+++ b/lisp/textmodes/text-mode.el
@@ -95,7 +95,7 @@ inherit all the commands defined in this map.")
:style toggle
:selected (memq 'turn-on-auto-fill text-mode-hook)]))
-(defun text-mode-menu (menu click)
+(defun text-mode-context-menu (menu click)
"Populate MENU with text selection commands at CLICK."
(when (thing-at-mouse click 'word)
@@ -127,7 +127,7 @@ You can thus get the full benefit of adaptive filling
Turning on Text mode runs the normal hook `text-mode-hook'."
(setq-local text-mode-variant t)
(setq-local require-final-newline mode-require-final-newline)
- (add-hook 'context-menu-functions 'text-mode-menu 10 t))
+ (add-hook 'context-menu-functions 'text-mode-context-menu 10 t))
(define-derived-mode paragraph-indent-text-mode text-mode "Parindent"
"Major mode for editing text, with leading spaces starting a paragraph.