Mercurial > emacs
changeset 43122:2630388260f5
(text-mode-hook-identify): Function deleted.
(text-mode): Set text-mode-variant here.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 06 Feb 2002 14:57:57 +0000 |
| parents | fbd196109c25 |
| children | 3349c41a0c5e |
| files | lisp/textmodes/text-mode.el |
| diffstat | 1 files changed, 2 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/text-mode.el Wed Feb 06 12:06:19 2002 +0000 +++ b/lisp/textmodes/text-mode.el Wed Feb 06 14:57:57 2002 +0000 @@ -65,6 +65,8 @@ (see the variable `adaptive-fill-mode'). \\{text-mode-map} Turning on Text mode runs the normal hook `text-mode-hook'." + (make-local-variable 'text-mode-variant) + (setq text-mode-variant t) (set (make-local-variable 'indent-line-function) 'indent-relative)) (define-derived-mode paragraph-indent-text-mode text-mode "Parindent" @@ -93,13 +95,6 @@ (defalias 'indented-text-mode 'text-mode) -(defun text-mode-hook-identify () - "Mark that this mode has run `text-mode-hook'. -This is how `toggle-text-mode-auto-fill' knows which buffers to operate on." - (set (make-local-variable 'text-mode-variant) t)) - -(add-hook 'text-mode-hook 'text-mode-hook-identify) - (defun toggle-text-mode-auto-fill () "Toggle whether to use Auto Fill in Text mode and related modes. This command affects all buffers that use modes related to Text mode,