mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00
Code Issues Releases Activity

*** empty log message ***

Browse Source
This commit is contained in:
Jim Blandy 1991-05-23 22:26:10 +00:00
parent 1c5998956d
commit 8c73a61a20
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/textmodes/text-mode.el
View File

@ -70,8 +70,11 @@ All the commands defined in Text mode are inherited unless overridden.")
(if indented-text-mode-map
()
(setq indented-text-mode-map (nconc (make-sparse-keymap) text-mode-map))
(define-key indented-text-mode-map "\t" 'indent-relative))
;; Make different definintion for TAB before the one in text-mode-map, but
;; share the rest.
(let ((newmap (make-sparse-keymap)))
(define-key newmap "\t" 'indent-relative)
(setq indented-text-mode-map (nconc newmap text-mode-map))))
(defun indented-text-mode ()
"Major mode for editing indented text intended for humans to read.\\{indented-text-mode-map}