diff contrib/mercurial.el @ 5465:9873cbb134b2

mercurial.el, mq.el: remove runtime dependencies on CL package * (require 'cl) at compile-time * don't use map()
author NIIMI Satoshi <sa2c@sa2c.net>
date Thu, 11 Oct 2007 05:58:54 +0900
parents 2ffe3e2a1ac2
children 521284cdbcb4
line wrap: on
line diff
--- a/contrib/mercurial.el	Thu Apr 12 13:11:30 2007 +0200
+++ b/contrib/mercurial.el	Thu Oct 11 05:58:54 2007 +0900
@@ -521,7 +521,7 @@
 	    (completing-read (format "Revision%s (%s): "
 				     (or prompt "")
 				     (or default "tip"))
-			     (map 'list 'cons revs revs)
+			     (mapcar (lambda (x) (cons x x)) revs)
 			     nil
 			     nil
 			     nil