branch: elpa/boxquote
commit e167b9d3256e0a87a19f6769f4204aa9bf23c633
Author: Dave Pearson <[email protected]>
Commit: Dave Pearson <[email protected]>
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