1
0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-12-03 08:30:03 +00:00

org.el (org-sort-entries): Restore the point location when there is nothing to sort

* org.el (org-sort-entries): Restore the point location when
there is nothing to sort.
This commit is contained in:
Bastien Guerry 2014-01-30 11:59:25 +01:00
parent ca69fdd884
commit 3c71ab34dd

View File

@ -8637,7 +8637,7 @@ links."
(show-all)))
(setq beg (point))
(if (>= beg end) (user-error "Nothing to sort"))
(when (>= beg end) (goto-char start) (user-error "Nothing to sort"))
(looking-at "\\(\\*+\\)")
(setq stars (match-string 1)