Mercurial > emacs
comparison lisp/eshell/em-prompt.el @ 43331:d65b6b00330f
(eshell-prompt-initialize): Do not use make-local-hook.
author | Pavel Janík <Pavel@Janik.cz> |
---|---|
date | Sat, 16 Feb 2002 09:40:19 +0000 |
parents | 67b464da13ec |
children | 695cf19ef79e d7ddb3e565de |
comparison
equal
deleted
inserted
replaced
43330:7c5bd619612f | 43331:d65b6b00330f |
---|---|
96 ;;; Functions: | 96 ;;; Functions: |
97 | 97 |
98 (defun eshell-prompt-initialize () | 98 (defun eshell-prompt-initialize () |
99 "Initialize the prompting code." | 99 "Initialize the prompting code." |
100 (unless eshell-non-interactive-p | 100 (unless eshell-non-interactive-p |
101 (make-local-hook 'eshell-post-command-hook) | |
102 (add-hook 'eshell-post-command-hook 'eshell-emit-prompt nil t) | 101 (add-hook 'eshell-post-command-hook 'eshell-emit-prompt nil t) |
103 | 102 |
104 (make-local-variable 'eshell-prompt-regexp) | 103 (make-local-variable 'eshell-prompt-regexp) |
105 (if eshell-prompt-regexp | 104 (if eshell-prompt-regexp |
106 (set (make-local-variable 'paragraph-start) eshell-prompt-regexp)) | 105 (set (make-local-variable 'paragraph-start) eshell-prompt-regexp)) |