aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1994-05-07 01:20:07 +0000
committerKarl Heuer1994-05-07 01:20:07 +0000
commit75a6b98e4d1c4834df7400a29687f1ea1cb934d2 (patch)
treec860ae498482e4faf15180a521f10a0868a11df6
parentc2d4b6d94433f983cb40035f3b1d9f4b38e577b6 (diff)
downloademacs-75a6b98e4d1c4834df7400a29687f1ea1cb934d2.tar.gz
emacs-75a6b98e4d1c4834df7400a29687f1ea1cb934d2.zip
(terminal-edit-mode): Doc fix.
(terminal-cease-edit): Reset the local keymap.
-rw-r--r--lisp/terminal.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/terminal.el b/lisp/terminal.el
index 0bec1908d42..33996e4bdee 100644
--- a/lisp/terminal.el
+++ b/lisp/terminal.el
@@ -484,7 +484,7 @@ lets you type a terminal emulator command."
484(defun terminal-edit-mode () 484(defun terminal-edit-mode ()
485 "Major mode for editing the contents of a terminal-emulator buffer. 485 "Major mode for editing the contents of a terminal-emulator buffer.
486The editing commands are the same as in Fundamental mode, 486The editing commands are the same as in Fundamental mode,
487together with a command \\<terminal-edit-mode-map>to return to terminal emulation: \\[terminal-cease-edit]." 487together with a command \\<terminal-edit-map>to return to terminal emulation: \\[terminal-cease-edit]."
488 (use-local-map terminal-edit-map) 488 (use-local-map terminal-edit-map)
489 (setq major-mode 'terminal-edit-mode) 489 (setq major-mode 'terminal-edit-mode)
490 (setq mode-name "Terminal Edit") 490 (setq mode-name "Terminal Edit")
@@ -540,6 +540,7 @@ together with a command \\<terminal-edit-mode-map>to return to terminal emulatio
540 (setq te-more-count -1))) 540 (setq te-more-count -1)))
541 541
542 (setq mode-line-modified (default-value 'mode-line-modified)) 542 (setq mode-line-modified (default-value 'mode-line-modified))
543 (use-local-map terminal-map)
543 (setq major-mode 'terminal-mode) 544 (setq major-mode 'terminal-mode)
544 (setq mode-name "terminal") 545 (setq mode-name "terminal")
545 (setq mode-line-process '(":%s"))) 546 (setq mode-line-process '(":%s")))