Mercurial > hg > xemacs-beta

diff lisp/cl.el @ 5471:00e79bbbe48f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge with trunk.
author Mats Lidell <matsl@xemacs.org>
date Mon, 14 Feb 2011 22:43:46 +0100
parents 0af042a0c116 22c4e67a2e69
children 248176c74e6b
line wrap: on
line diff
--- a/lisp/cl.el	Mon Feb 07 21:22:17 2011 +0100
+++ b/lisp/cl.el	Mon Feb 14 22:43:46 2011 +0100
@@ -542,9 +542,7 @@
 (defalias 'cl-round 'round*)
 (defalias 'cl-mod 'mod*)
 
-(defun acons (key value alist)
-  "Return a new alist created by adding (KEY . VALUE) to ALIST."
-  (cons (cons key value) alist))
+;;; XEmacs; #'acons is in C.
 
 (defun pairlis (keys values &optional alist)
   "Make an alist from KEYS and VALUES.