From: Andreas Schwab Date: Mon, 29 Mar 1999 09:06:05 +0000 (+0000) Subject: (tex-start-shell): Use add-hook for X-Git-Tag: emacs-20.4~422 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=09592182562a620f62b64851db83b76a5c22b555;p=emacs.git (tex-start-shell): Use add-hook for comint-input-filter-functions. Make variables related to shell directory tracking local. --- 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)))))