/[emacs]/emacs/lisp/eshell/eshell.el
ViewVC logotype

Diff of /emacs/lisp/eshell/eshell.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.11 by pj, Sat Jan 12 21:40:52 2002 UTC revision 1.12 by johnw, Sat Feb 16 07:10:35 2002 UTC
# Line 397  With prefix ARG, insert output into the Line 397  With prefix ARG, insert output into the
397    (unwind-protect    (unwind-protect
398        (let ((eshell-non-interactive-p t))        (let ((eshell-non-interactive-p t))
399          (add-hook 'minibuffer-setup-hook 'eshell-mode)          (add-hook 'minibuffer-setup-hook 'eshell-mode)
400            (add-hook 'minibuffer-exit-hook 'eshell-add-command-to-history)
401          (add-hook 'eshell-mode-hook 'eshell-return-exits-minibuffer)          (add-hook 'eshell-mode-hook 'eshell-return-exits-minibuffer)
402          (unless command          (unless command
403            (setq command (read-from-minibuffer "Emacs shell command: "))))            (setq command (read-from-minibuffer "Emacs shell command: "))))
404      (remove-hook 'eshell-mode-hook 'eshell-return-exits-minibuffer)      (remove-hook 'eshell-mode-hook 'eshell-return-exits-minibuffer)
405        (remove-hook 'minibuffer-exit-hook 'eshell-add-command-to-history)
406      (remove-hook 'minibuffer-setup-hook 'eshell-mode))      (remove-hook 'minibuffer-setup-hook 'eshell-mode))
407    (unless command    (unless command
408      (error "No command specified!"))      (error "No command specified!"))

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26