* eshell/esh-util.el (eshell-sublist): Remove unused local variable.
This commit is contained in:
@@ -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.
|
||||
|
||||
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user