summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorDave Love <fx@gnu.org>2001-03-05 18:41:37 +0000
committerDave Love <fx@gnu.org>2001-03-05 18:41:37 +0000
commit335db3c1d43a27d8bf3a5217d5b3ed42b888e736 (patch)
tree5e7a549ee053d47bf7fa6e5ffb0de149cb12d030 /lisp/emacs-lisp
parent49e37720a355bed123bc26d2b4e307c89cf7e7aa (diff)
downloademacs-335db3c1d43a27d8bf3a5217d5b3ed42b888e736.tar.gz
(dotimes, dolist): Undef prior to autoloading
new defs.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/cl.el3
1 files changed, 3 insertions, 0 deletions
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))))