diff options
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/esh-util.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/eshell/esh-util.el b/lisp/eshell/esh-util.el index 5e0aad8345f..6195f3976c1 100644 --- 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." | |||
| 217 | (defun eshell-sublist (l &optional n m) | 217 | (defun eshell-sublist (l &optional n m) |
| 218 | "Return from LIST the N to M elements. | 218 | "Return from LIST the N to M elements. |
| 219 | If N or M is nil, it means the end of the list." | 219 | If N or M is nil, it means the end of the list." |
| 220 | (let* ((a (copy-sequence l)) | 220 | (let ((a (copy-sequence l))) |
| 221 | result) | ||
| 222 | (if (and m (consp (nthcdr m a))) | 221 | (if (and m (consp (nthcdr m a))) |
| 223 | (setcdr (nthcdr m a) nil)) | 222 | (setcdr (nthcdr m a) nil)) |
| 224 | (if n | 223 | (if n |