(dotimes, dolist): Undef prior to autoloading

new defs.

2 files changed, 8 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fdc2e2cdb29..6d8fcbe5049 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-03-05  Dave Love  <fx@gnu.org>
+
+        * emacs-lisp/cl.el (dotimes, dolist): Undef prior to autoloading
+        new defs.
+
 2001-03-05  Kenichi Handa  <handa@etl.go.jp>
 
         * language/ethio-util.el (ethio-toggle-space): Update
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 "<none>" (car set))))