diff options
| author | Justin Burkett | 2024-04-23 09:20:28 -0400 |
|---|---|---|
| committer | Justin Burkett | 2024-04-23 09:20:28 -0400 |
| commit | ba323d6712d54806aa82847d017e94eafcf99d6f (patch) | |
| tree | 0dc9642f65b0d9ee1270cc96d2685242579cfecc | |
| parent | e21ee102ed5f2f60bd0bc47382c70aa8fd5b9c5b (diff) | |
| download | emacs-ba323d6712d54806aa82847d017e94eafcf99d6f.tar.gz emacs-ba323d6712d54806aa82847d017e94eafcf99d6f.zip | |
Revert "* which-key.el (which-key--partition-list): Replace cl-subseq by take"
This reverts commit 94a29cda9f75c9901667bf45ff25bd8c892cb416.
| -rw-r--r-- | which-key.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/which-key.el b/which-key.el index 1ece569e7ed..0e14c76df95 100644 --- a/which-key.el +++ b/which-key.el | |||
| @@ -2016,7 +2016,7 @@ that width." | |||
| 2016 | "Partition LIST into N-sized sublists." | 2016 | "Partition LIST into N-sized sublists." |
| 2017 | (let (res) | 2017 | (let (res) |
| 2018 | (while list | 2018 | (while list |
| 2019 | (setq res (cons (take (min n (length list)) list) res) | 2019 | (setq res (cons (cl-subseq list 0 (min n (length list))) res) |
| 2020 | list (nthcdr n list))) | 2020 | list (nthcdr n list))) |
| 2021 | (nreverse res))) | 2021 | (nreverse res))) |
| 2022 | 2022 | ||