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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 439b1db7d5f581b88b6370f4a4ef4900fae0d134..5b911a503b8ce06017648e34e01736b9325ee8e5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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.

diff --git a/lisp/eshell/esh-util.el b/lisp/eshell/esh-util.el
index 5e0aad8345f2435480e3d799dbd108718317eae7..6195f3976c11fe4f18256882408e23269336c877 100644 (file)
--- a/lisp/eshell/esh-util.el
+++ b/lisp/eshell/esh-util.el
@@ -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