summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/cl.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2012-08-08 14:56:01 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2012-08-08 14:56:01 -0400
commit4250fdf5b34a9fddf6ee1cf12270d9e269c1aa6e (patch)
tree22c8e124af42080b6bfab100b95a0441fa457c79 /lisp/emacs-lisp/cl.el
parentda3d210583cd7a9a22ca6a2d07cac5bbf6fca7c1 (diff)
downloademacs-4250fdf5b34a9fddf6ee1cf12270d9e269c1aa6e.tar.gz
* lisp/emacs-lisp/cl.el (cl-map-keymap-recursively, cl-map-intervals)
(cl-map-extents): Add compatibility aliases. Fixes: debbugs:12135
Diffstat (limited to 'lisp/emacs-lisp/cl.el')
-rw-r--r--lisp/emacs-lisp/cl.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/cl.el b/lisp/emacs-lisp/cl.el
index 8174de786c7..c9ed9efe0c5 100644
--- a/lisp/emacs-lisp/cl.el
+++ b/lisp/emacs-lisp/cl.el
@@ -686,6 +686,11 @@ from ARGLIST using FUNC: (define-modify-macro incf (&optional (n 1)) +)"
(define-obsolete-function-alias 'cl-hash-table-p 'hash-table-p "24.2")
(define-obsolete-function-alias 'cl-hash-table-count 'hash-table-count "24.2")
+(define-obsolete-function-alias 'cl-map-keymap-recursively
+ 'cl--map-keymap-recursively "24.2")
+(define-obsolete-function-alias 'cl-map-intervals 'cl--map-intervals "24.2")
+(define-obsolete-function-alias 'cl-map-extents 'cl--map-overlays "24.2")
+
(defun cl-maclisp-member (item list)
(declare (obsolete member "24.2"))
(while (and list (not (equal item (car list)))) (setq list (cdr list)))