Remove some compat code from esh-io.el
* lisp/eshell/esh-io.el (eshell-set-output-handle): Remove check for null-device, which is always bound.
This commit is contained in:
parent
e0e3fe4e7d
commit
75233e3ee0
1 changed files with 1 additions and 6 deletions
|
|
@ -382,12 +382,7 @@ it defaults to `insert'."
|
|||
"Set handle INDEX, using MODE, to point to TARGET."
|
||||
(when target
|
||||
(if (and (stringp target)
|
||||
(or (cond
|
||||
((boundp 'null-device)
|
||||
(string= target null-device))
|
||||
((boundp 'grep-null-device)
|
||||
(string= target grep-null-device))
|
||||
(t nil))
|
||||
(or (string= target null-device)
|
||||
(string= target "/dev/null")))
|
||||
(aset eshell-current-handles index nil)
|
||||
(let ((where (eshell-get-target target mode))
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue