branch: elpa/boxquote commit e167b9d3256e0a87a19f6769f4204aa9bf23c633 Author: Dave Pearson <da...@davep.org> Commit: Dave Pearson <da...@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