fix(user/rsync_tranches):Add author and license info
[BK-2020-03.git] / unitproc / elisp / my-reverse-region.el
... / ...
CommitLineData
1;; 2020-11-17T02:13Z; bktei> Function to reverse region of text
2(defun my-reverse-region (beg end)
3 "Reverse characters between BEG and END."
4 (interactive "r")
5 (let ((region (buffer-substring beg end)))
6 (delete-region beg end)
7 (insert (nreverse region))))