Commit 04fcf1b0 authored by Aidan Gauland's avatar Aidan Gauland
Browse files

Fix Eshell bug

* eshell/em-term.el (eshell-visual-command-p): Fix bug that
  causedoutput redirection to be ignored with visual commands.
parent 88b00caa
2013-06-09 Aidan Gauland <aidalgol@amuri.net>
* eshell/em-term.el (eshell-visual-command-p): Fix bug that caused
output redirection to be ignored with visual commands.
2013-06-09 Aidan Gauland <aidalgol@amuri.net>
 
* eshell/em-term.el (eshell-visual-command-p): New function.
......@@ -141,12 +141,13 @@ character to the invoked process."
If either COMMAND or a subcommand in ARGS (e.g. git log) is a
visual command, returns non-nil."
(let ((command (file-name-nondirectory command)))
(or (member command eshell-visual-commands)
(member (car args)
(cdr (assoc command eshell-visual-subcommands)))
(cl-intersection args
(cdr (assoc command eshell-visual-options))
:test 'string=))))
(and (eshell-interactive-output-p)
(or (member command eshell-visual-commands)
(member (car args)
(cdr (assoc command eshell-visual-subcommands)))
(cl-intersection args
(cdr (assoc command eshell-visual-options))
:test 'string=)))))
(defun eshell-exec-visual (&rest args)
"Run the specified PROGRAM in a terminal emulation buffer.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment