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)) |