* nxml/nxml-util.el (nxml-debug-clear-inside): Use cl-loop rather than loop.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2778c32decc6894e90dcd75cf777b70be351b05d..e9fab7f77c2152b46917fc25695f82362de7ff4d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2013-08-29  Glenn Morris  <rgm@gnu.org>
 
+       * nxml/nxml-util.el (nxml-debug-clear-inside):
+       Use cl-loop rather than loop.
+
        * net/eww.el (eww-mode-map): Lower-case menu bar entries look bad.
 
        * progmodes/sh-script.el (sh-builtins) <bash>: Add some bash4-isms.

diff --git a/lisp/nxml/nxml-util.el b/lisp/nxml/nxml-util.el
index 75479160cbb1b846af3da18c2ce882dfe8bfb657..c410aa12c8329f4f4b19ceace81c38f3b6b79381 100644 (file)
--- a/lisp/nxml/nxml-util.el
+++ b/lisp/nxml/nxml-util.el
@@ -45,7 +45,7 @@
 
 (defmacro nxml-debug-clear-inside (start end)
   (when nxml-debug
-    `(loop for overlay in (overlays-in ,start ,end)
+    `(cl-loop for overlay in (overlays-in ,start ,end)
            if (overlay-get overlay 'nxml-inside-debug)
            do (delete-overlay overlay)
            finally (nxml-debug-change "nxml-clear-inside" ,start ,end))))