[nongnu] elpa/boxquote e167b9d325 26/31: loop -> cl-loop

[ELPA Syncer]

branch: elpa/boxquote
commit e167b9d3256e0a87a19f6769f4204aa9bf23c633
Author: Dave Pearson <davep@davep.org>
Commit: Dave Pearson <davep@davep.org>

    loop -> cl-loop
---
 boxquote.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/boxquote.el b/boxquote.el
index 159a12b795..eb19a7bc84 100644
--- a/boxquote.el
+++ b/boxquote.el
@@ -522,10 +522,10 @@ prompted for a buffer. The key defintion used will be 
taken from that buffer."
                               (regexp-quote boxquote-bottom-corner)
                               "]" boxquote-top-and-tail))
                 (lines (concat "^" (regexp-quote boxquote-side))))
-            (loop while (< (point) (point-max))
-                  if (looking-at ends)  do (kill-line t)
-                  if (looking-at lines) do (delete-char 2)
-                  do (forward-line)))
+            (cl-loop while (< (point) (point-max))
+               if (looking-at ends)  do (kill-line t)
+               if (looking-at lines) do (delete-char 2)
+               do (forward-line)))
         (error "I can't see a box here")))))
 
 ;;;###autoload