🚀 go-pugleaf

Occasionally I find that Undo takes many steps when I want a single step.

For example, I write:

(defun remove-substrings-region (regexp beg end)
  "Remove any substrings matching REGEXP with the current REGION."
  (interactive "*sRegexp: \nr")
  (save-restriction
    (narrow-to-region beg end)
    (goto-char beg)
    (replace-regexp regexp "" nil)
    ))

Undo of this (unfortunately) treats each repacement sub-step separately.

I tried expanding the penultimate line to:
    (perform-replace regexp "" nil t nil)
with no improvement.

Perhaps this is wishlist, but I would like an elisp inverse of "undo-boundary",
to place several successive steps within one undo increment.

Thanks,
--
|------
| Wayne H. Caplinger			WCaplinger@tcs.com
| Teknekron Communications Systems
| 2121 Allston Way, Berkeley, CA 94704	415-649-3802	fax: 649-3600