[BK-2020-03.git] / unitproc / elisp / my-reverse-region.el

;; 2020-11-17T02:13Z; bktei> Function to reverse region of text
(defun my-reverse-region (beg end)
  "Reverse characters between BEG and END."
  (interactive "r")
  (let ((region (buffer-substring beg end)))
    (delete-region beg end)
    (insert (nreverse region))))