From 335db3c1d43a27d8bf3a5217d5b3ed42b888e736 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Mon, 5 Mar 2001 18:41:37 +0000 Subject: (dotimes, dolist): Undef prior to autoloading new defs. --- lisp/emacs-lisp/cl.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'lisp/emacs-lisp/cl.el') diff --git a/lisp/emacs-lisp/cl.el b/lisp/emacs-lisp/cl.el index 1b8bb838a8f..66947c01daa 100644 --- a/lisp/emacs-lisp/cl.el +++ b/lisp/emacs-lisp/cl.el @@ -552,6 +552,9 @@ Keywords supported: :test :test-not :key" "Non-nil means don't make CL functions autoload.") ;;; Autoload the other portions of the package. +;; We want to replace the basic versions of dolist, dotimes below. +(fmakunbound 'dolist) +(fmakunbound 'dotimes) (mapcar (function (lambda (set) (let ((file (if cl-fake-autoloads "" (car set)))) -- cgit v1.2.3