[elpa] externals/code-cells 5253bc1a78 1/4: Remove obsolete code-cells-do

[ELPA Syncer]

branch: externals/code-cells
commit 5253bc1a780cd0bed2632d13899fff521a7be54f
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Augusto Stoffel <arstoffel@gmail.com>

    Remove obsolete code-cells-do
---
 code-cells.el | 21 ---------------------
 1 file changed, 21 deletions(-)

diff --git a/code-cells.el b/code-cells.el
index 92d5631962..872b6dccb9 100644
--- a/code-cells.el
+++ b/code-cells.el
@@ -118,27 +118,6 @@ region bounds instead."
         (code-cells-backward-cell (abs count))
         (list (point) end)))))
 
-;;;###autoload
-(defmacro code-cells-do (&rest body)
-  "Find current cell bounds and evaluate BODY.
-Inside BODY, the variables `start' and `end' are bound to the
-limits of the current cell.
-
-If the first element of BODY is the keyword `:use-region' and the
-region is active, use its bounds instead.  In this case,
-`using-region' is non-nil in BODY."
-  `(pcase (if (and ,(eq (car body) :use-region) (use-region-p))
-              (list t (region-end) (region-beginning))
-            (save-excursion
-              (list nil
-                    (progn (code-cells-forward-cell) (point))
-                    (progn (code-cells-backward-cell) (point)))))
-     (`(,using-region ,end ,start)
-      ;; Avoid compiler warnings if one of those is unused in body
-      (ignore using-region end start)
-      ,@body)))
-(make-obsolete 'code-cells-do 'code-cells--bounds "2021-05-29")
-
 (defun code-cells--bounds-of-cell-relative-from (distance)
   "Return the bounds of the code cell which is DISTANCE cells away
 from the current one."