mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-27 04:02:53 +00:00
org.el (org-uniquify-alist): Improve docstring
* org.el (org-uniquify-alist): Improve docstring.
This commit is contained in:
parent
56bf3d7891
commit
9c141cfd8c
|
@ -21598,14 +21598,16 @@ for the search purpose."
|
||||||
(let ((res (copy-seq list))) (delete-dups res)))
|
(let ((res (copy-seq list))) (delete-dups res)))
|
||||||
|
|
||||||
(defun org-uniquify-alist (alist)
|
(defun org-uniquify-alist (alist)
|
||||||
"Merge duplicate elements of ALIST.
|
"Merge elements of ALIST with the same key.
|
||||||
|
|
||||||
For example, in this alist:
|
For example, in this alist:
|
||||||
|
|
||||||
\(org-uniquify-alist '((a 1) (b 2) (a 3)))
|
\(org-uniquify-alist '((a 1) (b 2) (a 3)))
|
||||||
=> '((a 1 3) (b 2))
|
=> '((a 1 3) (b 2))
|
||||||
|
|
||||||
merge (a 1) and (a 3) into (a 1 3) and return the new alist."
|
merge (a 1) and (a 3) into (a 1 3).
|
||||||
|
|
||||||
|
The function returns the new ALIST."
|
||||||
(let (rtn)
|
(let (rtn)
|
||||||
(mapc
|
(mapc
|
||||||
(lambda (e)
|
(lambda (e)
|
||||||
|
|
Loading…
Reference in a new issue