* eshell/esh-util.el (eshell-sublist): Remove unused local variable.

This commit is contained in:
Glenn Morris 2013-09-17 19:45:31 -07:00
parent 49a053fc5b
commit 91c837fe72
2 changed files with 2 additions and 2 deletions

View file

@ -5,6 +5,7 @@
* eshell/em-cmpl.el (eshell-complete-parse-arguments):
* eshell/em-hist.el (eshell/history, eshell-isearch-backward):
* eshell/em-pred.el (eshell-parse-modifiers, eshell-pred-file-time):
* eshell/esh-util.el (eshell-sublist):
Remove unused local variables.
* eshell/esh-io.el (x-select-enable-clipboard): Declare.

View file

@ -217,8 +217,7 @@ then quoting is done by a backslash, rather than a doubled delimiter."
(defun eshell-sublist (l &optional n m)
"Return from LIST the N to M elements.
If N or M is nil, it means the end of the list."
(let* ((a (copy-sequence l))
result)
(let ((a (copy-sequence l)))
(if (and m (consp (nthcdr m a)))
(setcdr (nthcdr m a) nil))
(if n