summaryrefslogtreecommitdiff
path: root/lisp/eshell/em-hist.el
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2021-04-03 01:21:32 +0200
committerStefan Kangas <stefan@marxist.se>2021-04-03 03:11:35 +0200
commitcd5dfa086d204c01791bfdcdf9fe1215c4bf1e42 (patch)
treeb87b59c29cc57b6d19048ba60e8e5b1356eacc38 /lisp/eshell/em-hist.el
parentbe9e3c48fab335c9084e472acef2065f41d20969 (diff)
downloademacs-cd5dfa086d204c01791bfdcdf9fe1215c4bf1e42.tar.gz
Replace two functions with seq-subseq
* lisp/emacs-lisp/seq.el (seq-subseq): Add autoload cookie. * lisp/eshell/esh-util.el (eshell-sublist): Redefine using seq-subseq and make obsolete. Update callers. * lisp/wid-edit.el (widget-sublist): Redefine as obsolete function alias for seq-subseq. Update callers.
Diffstat (limited to 'lisp/eshell/em-hist.el')
-rw-r--r--lisp/eshell/em-hist.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/eshell/em-hist.el b/lisp/eshell/em-hist.el
index b7b1778ebb1..e559f5b39fe 100644
--- a/lisp/eshell/em-hist.el
+++ b/lisp/eshell/em-hist.el
@@ -758,7 +758,7 @@ matched."
(setq nth (eshell-hist-word-reference nth)))
(unless (numberp mth)
(setq mth (eshell-hist-word-reference mth)))
- (cons (mapconcat #'identity (eshell-sublist textargs nth mth) " ")
+ (cons (mapconcat #'identity (seq-subseq textargs nth (1+ mth)) " ")
end))))
(defun eshell-hist-parse-modifier (hist reference)