diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2020-09-15 09:55:27 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2020-09-15 09:55:27 +0200 |
commit | 7dbd749bf8e3e59de68dee702a2a98c44e651ab9 (patch) | |
tree | f93660e864e99a90f456bbf6f4b1e899094a72d3 | |
parent | 10ed4994f59905d82e0ed3150256898f3648501b (diff) | |
download | org-mode-7dbd749bf8e3e59de68dee702a2a98c44e651ab9.tar.gz |
Tiny refactoring
* lisp/org.el (org-cycle): Use `org-match-line' instead of
`save-excursion' + `beginning-of-line' + `looking-at'.
-rw-r--r-- | lisp/org.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/org.el b/lisp/org.el index 4964e01..dfea48c 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -6352,8 +6352,7 @@ Use `\\[org-edit-special]' to edit table.el tables")) (= (line-beginning-position) (org-element-property :post-affiliated item))))) - (save-excursion (beginning-of-line 1) - (looking-at org-outline-regexp))) + (org-match-line org-outline-regexp)) (or (bolp) (not (eq org-cycle-emulate-tab 'exc-hl-bol)))) (org-cycle-internal-local)) ;; From there: TAB emulation and template completion. |