diff options
author | Simon Marshall <simon@gnu.org> | 1998-09-29 10:14:44 +0000 |
---|---|---|
committer | Simon Marshall <simon@gnu.org> | 1998-09-29 10:14:44 +0000 |
commit | d2b251aa61a97db704dbafee58635be63e9a3b2f (patch) | |
tree | a34837c1a45eb8cfc96313ccc8d492e8973e0506 | |
parent | 054e5c2010ca91e68c1ecfba6dd4da9b3416a0d9 (diff) | |
download | emacs-d2b251aa61a97db704dbafee58635be63e9a3b2f.tar.gz emacs-d2b251aa61a97db704dbafee58635be63e9a3b2f.tar.bz2 emacs-d2b251aa61a97db704dbafee58635be63e9a3b2f.zip |
make pre-command-hook & comint-exec-hook local hooks.
-rw-r--r-- | lisp/comint.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index 563c6e7d770..6b9bd418f97 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -467,11 +467,11 @@ Entry to this mode runs the hooks on `comint-mode-hook'." (make-local-variable 'comint-scroll-to-bottom-on-input) (make-local-variable 'comint-scroll-to-bottom-on-output) (make-local-variable 'comint-scroll-show-maximum-output) - (make-local-variable 'pre-command-hook) - (add-hook 'pre-command-hook 'comint-preinput-scroll-to-bottom) + (make-local-hook 'pre-command-hook) + (add-hook 'pre-command-hook 'comint-preinput-scroll-to-bottom t t) (make-local-hook 'comint-output-filter-functions) + (make-local-hook 'comint-exec-hook) (make-local-variable 'comint-ptyp) - (make-local-variable 'comint-exec-hook) (make-local-variable 'comint-process-echoes) (make-local-variable 'comint-file-name-chars) (make-local-variable 'comint-file-name-quote-list) |