From 252bfbdc9aee3bf968a214425dd4790107d4532d Mon Sep 17 00:00:00 2001 From: =?utf8?q?Pavel=20Jan=C3=ADk?= Date: Sat, 16 Feb 2002 09:42:11 +0000 Subject: [PATCH] (eshell-cmd-initialize): Do not use make-local-hook. --- lisp/eshell/esh-cmd.el | 4 ---- 1 file changed, 4 deletions(-) diff --git a/lisp/eshell/esh-cmd.el b/lisp/eshell/esh-cmd.el index 7793f87e4eb..04a01f1234e 100644 --- a/lisp/eshell/esh-cmd.el +++ b/lisp/eshell/esh-cmd.el @@ -295,28 +295,24 @@ command line.") (set (make-local-variable 'eshell-last-command-name) nil) (set (make-local-variable 'eshell-last-async-proc) nil) - (make-local-hook 'eshell-kill-hook) (add-hook 'eshell-kill-hook 'eshell-resume-command nil t) ;; make sure that if a command is over, and no process is being ;; waited for, that `eshell-current-command' is set to nil. This ;; situation can occur, for example, if a Lisp function results in ;; `debug' being called, and the user then types \\[top-level] - (make-local-hook 'eshell-post-command-hook) (add-hook 'eshell-post-command-hook (function (lambda () (setq eshell-current-command nil eshell-last-async-proc nil))) nil t) - (make-local-hook 'eshell-parse-argument-hook) (add-hook 'eshell-parse-argument-hook 'eshell-parse-subcommand-argument nil t) (add-hook 'eshell-parse-argument-hook 'eshell-parse-lisp-argument nil t) (when (eshell-using-module 'eshell-cmpl) - (make-local-hook 'pcomplete-try-first-hook) (add-hook 'pcomplete-try-first-hook 'eshell-complete-lisp-symbols nil t))) -- 2.39.2