From 09592182562a620f62b64851db83b76a5c22b555 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Mon, 29 Mar 1999 09:06:05 +0000 Subject: [PATCH] (tex-start-shell): Use add-hook for comint-input-filter-functions. Make variables related to shell directory tracking local. --- lisp/textmodes/tex-mode.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index 1f248699758..c620a25fc64 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el @@ -1005,7 +1005,11 @@ Mark is left at original location." (tex-define-common-keys tex-shell-map) (use-local-map tex-shell-map) (compilation-shell-minor-mode t) - (setq comint-input-filter-functions 'shell-directory-tracker) + (add-hook 'comint-input-filter-functions 'shell-directory-tracker nil t) + (make-local-variable 'list-buffers-directory) + (make-local-variable 'shell-dirstack) + (make-local-variable 'shell-last-dir) + (make-local-variable 'shell-dirtrackp) (run-hooks 'tex-shell-hook) (while (zerop (buffer-size)) (sleep-for 1))))) -- 2.39.2