diff options
| author | Richard M. Stallman | 1995-06-14 12:05:55 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-06-14 12:05:55 +0000 |
| commit | 1458efa037c5d2a7f43c4a980e2dc170f475d0ad (patch) | |
| tree | be1af918b81aa1ee428e100ebae061eaab7e6520 /lisp | |
| parent | b35732e1e2d1f32c4e4bd3940ca07c1dc641d50f (diff) | |
| download | emacs-1458efa037c5d2a7f43c4a980e2dc170f475d0ad.tar.gz emacs-1458efa037c5d2a7f43c4a980e2dc170f475d0ad.zip | |
(shell-mode): Make shell-directory-tracker a hook function locally only.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/shell.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/shell.el b/lisp/shell.el index 33e10847616..2f297cb588d 100644 --- a/lisp/shell.el +++ b/lisp/shell.el | |||
| @@ -328,7 +328,7 @@ buffer." | |||
| 328 | (setq shell-last-dir nil) | 328 | (setq shell-last-dir nil) |
| 329 | (make-local-variable 'shell-dirtrackp) | 329 | (make-local-variable 'shell-dirtrackp) |
| 330 | (setq shell-dirtrackp t) | 330 | (setq shell-dirtrackp t) |
| 331 | (add-hook 'comint-input-filter-functions 'shell-directory-tracker) | 331 | (add-hook 'comint-input-filter-functions 'shell-directory-tracker nil t) |
| 332 | (setq comint-input-autoexpand shell-input-autoexpand) | 332 | (setq comint-input-autoexpand shell-input-autoexpand) |
| 333 | (make-local-variable 'list-buffers-directory) | 333 | (make-local-variable 'list-buffers-directory) |
| 334 | (setq list-buffers-directory (expand-file-name default-directory)) | 334 | (setq list-buffers-directory (expand-file-name default-directory)) |