[Emacs-diffs] Changes to emacs/lisp/eshell/esh-cmd.el

[Pavel Janík]

Index: emacs/lisp/eshell/esh-cmd.el
diff -c emacs/lisp/eshell/esh-cmd.el:1.16 emacs/lisp/eshell/esh-cmd.el:1.17
*** emacs/lisp/eshell/esh-cmd.el:1.16   Sat Jan 26 07:05:22 2002
--- emacs/lisp/eshell/esh-cmd.el        Sat Feb 16 04:42:11 2002
***************
*** 295,322 ****
    (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)))
  
--- 295,318 ----