diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-13 06:07:32 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-13 06:11:51 +0200 |
| commit | ab2b822b9bbac321ec061de349cf0166cc406fe7 (patch) | |
| tree | d6e73ad8be8ea7fd9013e7821c959cf4e5a86ddd /lisp/emacs-lisp | |
| parent | 78e1640ad52a58ec53ddacf73a3e3a292d7833f1 (diff) | |
| download | emacs-ab2b822b9bbac321ec061de349cf0166cc406fe7.tar.gz emacs-ab2b822b9bbac321ec061de349cf0166cc406fe7.tar.bz2 emacs-ab2b822b9bbac321ec061de349cf0166cc406fe7.zip | |
Revert "Make cl-concatenate an alias of seq-concatenate"
This reverts commit 78f76fe16e2737b40694f82af28d17a90a21ed7b.
The commit made calls to cl-concatenate bug out, since
autoloading defalises doesn't work very well (bug#54901).
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/cl-extra.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/cl-extra.el b/lisp/emacs-lisp/cl-extra.el index ed9b1b7d836..fd94554ca19 100644 --- a/lisp/emacs-lisp/cl-extra.el +++ b/lisp/emacs-lisp/cl-extra.el @@ -554,9 +554,10 @@ too large if positive or too small if negative)." (seq-subseq seq start end)) ;;;###autoload -(defalias 'cl-concatenate #'seq-concatenate +(defun cl-concatenate (type &rest sequences) "Concatenate, into a sequence of type TYPE, the argument SEQUENCEs. -\n(fn TYPE SEQUENCE...)") +\n(fn TYPE SEQUENCE...)" + (apply #'seq-concatenate type sequences)) ;;; List functions. |