summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2022-04-16 13:46:04 -0400
committerEli Zaretskii <eliz@gnu.org>2022-04-16 13:46:04 -0400
commit6ecb7ff5ec9492a8671df63ae097ca2045d18494 (patch)
tree926cfcc36831fc2085be3366ea3ea41912cfeff8 /lisp/emacs-lisp
parent25db9dfae00b2638f167d078a076108b8c911fbf (diff)
parentb201823f631082d4f386304ee9ec24b0d85f5def (diff)
downloademacs-6ecb7ff5ec9492a8671df63ae097ca2045d18494.tar.gz
emacs-6ecb7ff5ec9492a8671df63ae097ca2045d18494.tar.bz2
emacs-6ecb7ff5ec9492a8671df63ae097ca2045d18494.zip
Merge from origin/emacs-28
b201823f63 Describe problems with invoking Python on MS-Windows 880f2734c9 A better fix for bug#54800 5ee959aa87 Add a comment about cl-concatenate ab2b822b9b Revert "Make cl-concatenate an alias of seq-concatenate"
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/cl-extra.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/cl-extra.el b/lisp/emacs-lisp/cl-extra.el
index ed9b1b7d836..8e38df43c87 100644
--- a/lisp/emacs-lisp/cl-extra.el
+++ b/lisp/emacs-lisp/cl-extra.el
@@ -553,10 +553,14 @@ too large if positive or too small if negative)."
,new)))))
(seq-subseq seq start end))
+;;; This isn't a defalias because autoloading defalises doesn't work
+;;; very well.
+
;;;###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.